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40  characters-per-second 

80  characters  per  tine 

Upper  and  lower  case 

Continuous  graphics  at  60 
dots  per  inch 

Microprocessor  controlled 

Bidirectional  look-ahead 
printing 

Automatic  "wrap-around" 

Quiet  operation 


The  Trendcom  200  is  a  high  speed  Iher- 
ma!  printer  offering  the  combination  of 
text  printing  at  80  characters  per  line 
and  continuous  graphics  at  60  dots  per 
inch,  In  the  text  mode,  upper  and  lower 
case  data  are  printed  at  40  characters 
per  second.  The  5x7  characters  pro- 
vide clear  readable  copy  on  white 
paper:  no  hard  to  find,  hard  to  read 
aluminized  paper. 

In  the  graphics  mode,  seven  bits 
of  each  byte  correspond  to  the  seven 
dots  in  each  of  1he480  print  positions 
per  line.  Since  the  computer  driving  the 
printer  has  full  control  over  every  print 
position,  it  can  print  graphs,  bar 
charts,  line  drawings,  even  special  and 
foreign  language  symbols.  Despite  its 
low  cost,  the  Trendcom  200  is  a  true  in- 


telligent printer  with  fulMine  buffering 
and  bidirectional  look-ahead  printing. 
After  one  line  has  been  printed  left  to 
right,  the  internal  microprocessor 
examines  the  next  line  to  choose  the 
shortest  print  direction.  The  micro- 
processor also  provides  a  built-in  self- 
lest  mode  for  easy  verification  of 
proper  operation. 

High  reliability  is  designed  in:  The 
thick  film  thermal  print  head  has  a  life 
expectancy  of  100.000.000  characters. 
Two  DC  stepping  motors  provide 
positive  control  of  the  print  head  and 
the  paper  drive,  the  printer's  only 
driven  parts.  The  absence  of  gears  and 
solenoids  also  makes  the  printer 
extremely  quiet;  the  only  noise  is  the 
rustling  of  the  paper  advancing. 


Skyles  PAL-80  printer{s)  complete  with  2 '/a  foot  interface  cable  to  attach  to  my  PET  at  $675.00  each,*  {Plus  S10.00  ship. 

ping  and  handling.)  I  also  will  receive  a  test  and  graphics  demonstration  tape  at  no  additional  charge  and  over  150  feet  of  8% 

inch  wide  black  on  white  thermal  paper. 

rolls  of  SVj  ioch  wide  by  85  ft.  long  thernnal  paper  (black  ink)  at  $5.00  eacfi;  or  cartons  at  10®  S45.00. 


Visa,  Mastercharge  orders  call  (800)  538-3083 

Skyles  Electric  Works 

231E  South  Whisman  Road  Mountain  View, CA  94041   (415)  965-1735 


California  orders  please  call  (408)  257-9140 
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ow  you  can  add  high 
resolution  graphics 
to  your  Commodore  PET 
computer.  The  MTU 
K-1008-6  GRAPHIC  INTERFACE 
can  be  used  with  either  old,  new, 
or  business  PET  computers.  It  Is 
.      simple  to  use,  and  fits  inside  the 
PET  for  protection. 

The  GRAPHICINTERFACE  gives  you  easy  con- 
'    trol  over  each  dot  in  a  matrix  which  is  320  wide  by 
200  high  for  a  total  of  64,000  dots.  Because  each 
dot  can  be  controlled,  either  graphic  images,  text 
lines,  or  any  mixture  of  the  two  can  be  displayed. 
Since  each  dot  Is  controlled  from  software  you  can 
even  design  your  own  special  character  font  or  graphic 
Image  set  (logic,  chemical,  architectural). 

INTERFACE  TO  ALL  PETS  •  With  separate  connector  boards 
for  each  style  PET  (K-1007-2  for  OLD  PETS,  K-1007-3  for  NEW). 
The  K-1008-6  can  be  used  with  either. 

THREE  TYPES  OF  VIDEO  -  You  can  select  either  normal  PET 
video,  graphic  video,  or  the  COMBINED  image  of  both  video  sig- 
nals simultaneously! 

8K  RAM  MEMORY  EXPANSION  ■  The  graphic  matrix  requires  8K 
RAM  which  is  supplied  onboard.  This  memory  can  be  used  for 
,     program  or  data  storage  when  not  being  used  for  graphics  (or  see 
your  program  in  binary  on  the  display!). 

FLEXIBLY  ADDRESSED  ROM  SOCKETS  -  Five  ROM  sockets  are  included 
on  the  board.  They  can  be  set  at  the  same  or  different  addresses,  with  you 
controlling  which  sockets  are  enabled  at  any  time  through  software  control. 
You  also  choose  the  sockets  to  be  enabled  when  the  PET  is  turned  on. 

EXTERNAL  EXPANSION  -  This  board  also  creates  the  KIM  memory  expansion 
bus  supported  by  all  MTU  products.  This  allows  insertion  Into  our  K-1005-P 
card  file  for  expansion  up  to  4  other  boards  outside  the  PET  case. 

LIGHT  PEN  •  The  board  has  been  designed  to  work  with  an  optional  light 
pen  which  MTU  will  be  announcing  soon. 

SOFTWARE  INTERFACED  TO  BASIC  -  MTU  also  has  available  machine  lan- 
guage software  to  allow  you  to  plot  points,  draw  lines,  and  dispiay  char- 
acters at  high  speed. 

Call  or  write  for  our  full  line  catalog  of  products. 

MICRO  TECHNOLOGY  UNLIMITED 


P.O.  Box  12106 
2806  Hillsborough  Street 
Raleigh,  N.C.  27605 
(603)  627-1464 


'  Micro  Tedwiology  IMimited 

P.O.  Box  12106 
,      Z806  HlllsbofOUBh  Street 
Raleigh,  N.C.  27605 

As  of  June  1,  1980 
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Professional  Business  Software 

For  The  Commodore  32K  Microcomputer  System 
With  2040  Dual  Drive  Disk  &  2022  Tractor  Feed  Printer 


General  Ledger 


Accounts  Payable 


Accounts  Receivable 


Payroll 


•  Holds  Up  To  300  Accounts. 

•  Accepts  Up  To  3000 
Transactions  Per  Month. 

•  Cash  Disbursements  Journal, 
Cash  Receipts  Journal,  and 
Petty  Cash  Journal  for 
simplified  data  entry, 

•  Maintains  Account  Balances 
For  Present  Monlh,  Present 
Quarter,  Present  Year,  Three 
Previous  Quarters,  And 
Previous  Year. 

•  Complete  Financial  Reports 
Including  Trial  Balance. 
Balance  Sheet,  Profit  &  Loss 
Statement.  Cash  Receipts 
Journal,  Cash  Disbursements 
Journal,  Petty  Cash  Journal 
and  more, 

•  Accepts  Postings  From 
External  Sources  Such  As 
Accounts  Payable,  Accounts 
Receivable,  f^ayroll. 

Etc S295.00 


•  Interactive  Data  Entry  With 
Verified  Input  And  Complete 
Operator  f^rompting. 

•  Automatic  Application  Of 
Credit  And  Debit  Memos. 

•  Maintains  Complete  Purchase 
Records  For  Up  To  200 
Vendors. 

•  Invoice  File  Accepts  Up  To 
400  Invoices. 

•  Random  Access  File 
Organization  Allows  Fast 
Individual  Record  Updating 

•  Multiple  Reports  Provide  A 
Complete  Audit  Trail. 

•  Check  Printing  With  Full 
Invoice  Detail. 

•  Full  Invoice  Aging. 

•  Automatic  Posting  To 
General  Ledger $195.00 


•  Maintains  Invoice  File  For  Up 
To  300  Invoices. 

•  Accomodates  Full  Or  Partial 
Invoice  Payments. 

•  Customer  File  Maintains 
Purchase  Information  For  Up 
To  1000  Customers. 

•  Allows  For  Automatic 
Progress  Billing. 

•  Provides  For  Credit  And  Debit 
Memos  As  Well  As  Invoices. 

•  Prints  Individualized 
Customer  Statements, 

•  Interactive  Data  Entry  With 
FullOperator  Prompting. 

•  Complete  Data  Input 
Verification  And  Formating. 

•  Automatic  Posting  To 
General  Ledger  . . .  ,$195.00 


•  Maintains  Monthly,  Quarterly. 
And  Yearly  Cumulative  Totals 
For  Each  Employee, 

•  Payroll  Check  Printing  With 
Full  Deduction  And  Pay  Detail. 

•  Sixteen  Different  Reports 
Including  W2  And  941. 

•  Interactive  Data  Entry  With 
Easy  Correction  Of  Entry 
Errors. 

•  Automatic  Data  Verification. 

•  Complete  Job  Costing  Option 
With  Cumulative  Totals  And 
Overhead  Calculations, 

•  Random  Access  File 
Organization  For  Fast 
Updating  Of  Individual 
Records. 

•  Automatic  Posting  To 
General  Ledger, , .  .S350,00 


Structured  around  the  time  tested  and  reliability  proven 
series  of  business  software  systems  developed  by  Osborne 
and  Associates,  these  programs  have  been  designed  to  fill 
the  need  of  a  comprehensive  accounting  package  for  the 
new  Commodore  PET  micro  computer  system.  Each  program 
can  either  stand  alone,  or  be  integrated  with  the  others  in  a 
total  software  system. 

Designed  with  the  first  time  user  in  mind,  these  programs 
lead  the  operator  through  step  by  step,  verified  data  entry.  It 
is  impossible  to  'crash'  a  program  due  to  operator  error  or 
invalid  data  input.  Design  consistency  has  been  maintained 
from  program  to  program  to  greatly  increase  operator 
familiarity  and  confidence. 

Documentation,  normally  a  problem  for  small  systems 
users,  is  provided  by  the  comprehensive  series  of  Osborne 


and  Associates  user  manuals.  These  three  manuals  together 
total  over  800  pages  of  detailed  step  by  step  instructions 
written  at  three  levels  for  DP  Department  Managers.  Data 
Entry  Operators,  and  Programmers.  You  don't  have  to  worry 
about  getting  'promises'  instead  of  documentation  because 
the  documentation  was  written  before  the  programs 
were  developed,  A  second  set  of  manuals  details  any 
changes  required  during  conversion.  Each  program 
provided  on  disk  with  complete  documentation  Packaged 
in  a  handsome  three  ring  binder  with  pockets  and  twelve 
monthly  dividers  for  convenient  storage  of  reports. 

See  \four  nearest  Commodore  dealer  for  a  demonstra- 
tion of  (/i/s  outstanding  business  software  system. 


CMS  Software  Systems 


5115MENEFEEDRIVE 


DALU\S,  TX  75227 


214-381-0690 
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The  Editor's 

vi  Of  6S  Robert  Lock 

Interesting  Months  Ahead... 

As  the  small  computer  market  expands,  the  various 
manufacturers  are  Hning  up  a  host  of  new  support  pro- 
ducts aimed  at  expanding  their  own  coverage  of  the 
market. 

Apple  formally  introduced  the  Apple  III  at  the 
NCC  in  California.  You'll  find  a  full  review  on  the 
"Appletivities"  and  the  Apple  III  in  this  issue's 
Apple  Gazette. 

From  Commodore,  we  can  expect  (in  the  next  30 
days),  initial  deliveries  of  their  modem/rommunica- 
tions  module.  Hard  on  the  heels  of  this  new  hard- 
ware comes  PASCAL  for  the  Commodore  line.  Not 
the  UCSD  version,  this  Pascal,  developed  in  England 
by  Commodore  UK,  requires  a  32K  machine.  Price 
was  not  available  at  press  time,  but  look  for  initial 
deliveries  by  the  end  of  July. 

A  Host  of  New  Peripherals 

From  Commodore,  we  can  look  forward  to  a  whole 

group  of  new  goodies  during  the  summer  and  fall:  A 

fifteen  character  per  second,  bi-directional  daisy 

wheel  printer  in  the  $1500.00  price  range. 

Commercial  Basic  with  print  using  and  fioating 

point  decimal  arithmetic, 

A  10  megabyte  hard  disk  drive,  a  family  of  8-inch 

disk  drives,  and  a  lower  cost  single  disk  drive. 

A  monitor-less  color  machine  for  well  under  $1000.00 

with  such  user  oriented  features  as  programmable 

sound  and  color  function  keys. 

We've  also  heard  that  a  132  column  printer  is  on 

the  way  from  Commodore...  in  short  a  host  of  new 

support  products. 

It  seems  that  the  Atari  systems  are  starting  to 
pick  up  some  momentum  in  the  consumer  market,  and 
Atari  appears  to  be  moving  to  increase  their  target 
area.  Chief  among  these  high  end  introductions  are 
their  80  column  printer  and  dual  density,  dual  drive 
disk.  Their  I/O  module,  scheduled  to  sell  for 
$219.95,  is  being  released.  It  provides  four  serial  I/O 
ports,  and  one  parallel  port.  The  new  80  column 
printer,  whose  specifications  are  quite  similar  to  the 
Centronics  737,  lists  at  $995.95  and  requires  the 
parallel  port  on  the  I/O  module.  Among  their  other 
new  or  soon  to  be  releases  are  the  326K  dual 
density,  dual  drive  disk  ($1495.00),  the  modem 
($200.00),  and  the  Atari  light  pen  ($75.00).  They're 
also  showing  off  the  Accounting  Package  now, 
and  dealers  should  have  it  available  by  mid  to  late 
summer. 

One  other  item  of  interest...  the  Atari  800  system 
has  been  reconfigured  as  of  June  I,  and  incorporates 
these  changes:  The  price  is  still  $1080.00.  The  system 
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now  comes  with  16K  standard  rather  than  8K 
standard.  It  no  longer  includes  the  tape  cassette, 
the  Educational  Master  Cartridge,  or  the  Introduc- 
tion to  Programming  tape. 

It  May  Be  Months  Away  But... 

Mattel!  is  moving  into  the  expanding  computer 
market  as  well.  Their  Inteliivision  line  is  the  vehicle 
chosen,  and  the  microprocessor?  None  other  than  our 
favorite,  the  6502.  The  unit  will  provide  Microsoft 
Basic  as  well,  another  plus  in  COMPUTE's  book  of 
How  to  Write  General  Articles  that  Help  All  Readers... 
While  the  formal  introduction  is  months  away,  we're 
mentioning  it  because  it  helps  show  the  future 
strength  of  the  6502.  The  Dr.  Chip  Interview  in 
this  issue  provides  the  only  details  we  have  as  yet. 

Speaking  of  Microsoft:  Atari,  by  the  way,  is 
rumored  to  be  bringing  out  a  Microsoft  Basic 
for  their  own  machines.  Ah,  yes.  COMPUTE 
votes  for  it. 

All  ttie  Activity  is  Not  on  the  Inside 

We've  reviewed  Visicalc  in  this  issue.  While  our 
version  is  the  Apple  one,  you  Commodore  and  Atari 
owners  will  be  happy  to  know  that  Visicalc  will  be 
available  for  your  machines  this  summer.  See  the 
box  with  the  review  for  "press  time"  details. 

Color  For  The  Commodore 

The  Electric  Crayon  is  coming!  Regency  Educational 
Systems  (7407  Brantfield  Drive,  Dallas,  TX  75248) 
has  just  introduced  their  Regency  Crayon  for  the 
Commodore  machines.  It  is  said  to  run  on  old  and  new 
ROMs,  etc.  With  $495.00  and  a  color  TV  or  monitor, 
viola!...  a  color  PET.  The  set-up  comes  with  6K  of 
refresh  memory,  cables,  and  software  that  runs  in  less 
than  IK  of  memory.  Users  end  up  with  10  different 
graphics  modes  and  eight  colors.  Resolution  on  the 
graphics  modes  ranges  from  32  by  16  to  256  by  192. 
One  is  on  the  way  to  us  and  we'll  have  a  full  review 
next  issue.  $495's  not  cheap,  but  if  you  ever  wanted 
a  more  colorful  life  for  your  PET,  here  you  are. 


Business  Software 
Reviewers  Needed 

I  realize  that  those  of  you  using  your  machines 
for  business  applications  are  quite  busy.  We  still 
need  qualified  practicing  business  people  to  re- 
view software.  If  you'd  like  to  be  on  the  list, 
send  me  a  note  with  name,  address,  business 
applications/needs,  and  system  configuration.  For 
your  time,  you  just  might  end  up  with  a  free  re- 
view copy  of  some  package  you've  been  looking 
for. 


This  Didn't  Come  In  Time 
for  Dr.  Chip  but... 

VIC  was  "market  screened"  by  Commodore  in  a 
private  booth  at  the  Consumer  Electronics  Show  in 
Chicago.  Who's  VIC?  VIC,  or  Video  Interface 
Computer,  is  a  6502  based  self-contained  computer 
that's  small  enough  to  fit  into  a  briefcase,  hook 
up  to  your  TV  or  monitor,  and  is  expected  to  sell 
for  something  between  $300.00  and  $400.00.  It  will 
not  be  available  until  sometime  in  the  Fall 
(it's  currently  in  prototyping),  but  here's  my  best 
guess  at  the  final  minimum  configuration: 

4K  RAM 

20  Columns  by  25  Lines 

Small  keyboard,  similar  to  that  of  the  early 
PET,  but  redesigned 

"Simple"  PET  Basic 

Extensive  interfacing  capability  for  joysticks, 
lightpens,  and  sound  synthesis 

Two  modes  of  graphics  resolution 
A  color  version  is  expected  to  be  available  for  a 
higher  price,  with  other  options  including  40  columns, 
8K,  full  keyboard,  and  full  BASIC.  COMPUTE  is 
happy  to  see  the  6502  community  grow! 

One  Last  Update... 

The  new  Panasonic  machine  is  6502  based.  It  comes 
with  IK  (yes  Jim,  IK),  but  has  an  expansion  module 
for  12K.  Pricing  (unconfirmed  at  this  point)  is  around 
$400.00.  It's  tiny...  apparently  not  much  larger 
than  (for  example)  those  language  translators  we've 
seen  advertised  lately.  COMPUTE  assumes  it  won't 
have  Microsoft  as  standard  equipment,  but  we 
can  always  hope!  Next  issue  we'll  shoot  for  a 
comprehensive  6502  new  machine  profile,  complete 
with  photos. 

The  Missing  Columns 

The  Learning  Lab,  by  Marlene  Pratto,  will  return  in 
the  next  issue.  Pet  Programs  on  Tape  Exchange  by 
Gene  Beals  will  also  return  in  the  next  issue.  *£ 

Program  Listings  for  COMPUTE 

Cursor  control  characters  will  appear  in  source  listings 
as  shown  below: 

Ja=HOME  ,  fi=:CLEAR    SCREEN 

i^^DOWN    CURSOR    ,  T=UP    CURSOR 

>=RIGHT   CURSOR,  ■«=LEFT    CURSOR 

j:=REVERSE  ,  f-REVERSE    OFF 

Graphics  (i.e.  shifted)  characters  will  appear  as  the 
unshifted  alphanumeric  character  with  an  underline. 
This  does  not  apply  to  the  cursor  control  characters. 
The  Spinwriter  thimble  doesn't  have  a  backarrow 
symbol,  so  a  "-""  is  used  instead. 

The  "-n"  is  used  to  indicate  the  beginning  of  a 
continuation  line.  It  is  also  used  to  indicate  the  end 
of  a  line  which  ends  with  a  space.  This  prevents  any 
spaces  from  being  hidden.  © 
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The  Reader's 

r©©QDQCKRobert  Lock 

My  thanks  to  all  of  you  who  responded  to  the 
first  round  of  Editor's  Feedback  cards.  Voted  Best 
Article  in  Issue  4  was  Elizabeth  Deal's  "Big  Files 
on  A  Small  Computer",  followed  closely  by  "Block 
Access  Method  Map"  (Tom  Conrad)  and  "PET  Get 
With  Flashing  Cursor"  (Gary  Greenburg).  The 
Editor's  Feedback  cards  are  here  to  stay.  You'll 
find  one  bound  into  the  center  of  the  magazine. 
With  this  issue,  we  initiate  a  continuing  forum  through 
which  I'll  respond  to  your  feedback  cards.  Keep 
them  coming! 

"I'm  developing  software  for  agricultural  use.  Would 
like  nput  from,  and  communication  with  others  interes- 
ted in  this  area.  How  about  a  reader  response 
column?" 

Okay.  If  you're  currently  working  on  software  for  a 
specific  applications  area,  or  looking  for  some,  drop  me 
a  note. 

"Please  make  longer  programs  available  on  tape..." 
Done.  At  least  for  PET.  Some  of  our  longer  programs 
will  now  be  available  from  the  PET  Software  on  Tape 
Exchange  (See  the  table  of  contents). 

"...  step  by  step  machine/assembly  language  usage 
examples..." 

"...  simple  machine  language  programs...  every  step 
shown,  preferably  the  "how"  and  not  "why"." 
We  're  working  on  this  one  and  hope  to  introduce  a  general 
purpose  series  in  the  next  issue. 
"More  business  applications  reviews..." 
"We  are  waiting  for  your  review  of  Rich  Daley's 
Mail  List  program.  It  blows  up  in  three  out  of  three 
systems;  while  it  is  very  powerful,  the  original  and... 
new  version...  don't  seem  to  stand  the  test  of  time... 
We  are  waiting  here  for  your  review  to  see  if  you  will 
plug  his  product  because  of  his  ad  money  or  shoot  it 
down." 

Neither.  At  least  'till  next  issue.  Apparently  Richard  ran 
afoul  of  various  ROM  changes  (DOS  problems)  and  thus 
the  bugs.  I've  personally  talked  to  afield  test  site  that 
is  up  and  running  with  the  current  version.   They're  engaged 
in  extensive  re-testing  and  debugging.   This  is  the  version 
Richard  intends  to  release,  along  with  an  almost  70  page 
booklet  of  supporting  documentation.   You,  and  two  other 
people,  wrote  about  this.  Richard  has  assured  me  that  all 
owners  of  the  new  program  will  be  "retrofitted "  with  the 
new  version,  and  new  documentation,  at  no  charge. 

We  expect  to  review  his  new  software  next  time,  as 
well  as  that  of  several  others  recently  introduced.  Several 
of  the  newer  mailing  programs  are  designed  to  interact 
with  Commodore 's  Word  Pro  III. 

"I  would  like  to  know  more  about  available  commands 
for  Atari.  Included  manual  wasn't  very  complete  and 
was  hard  to  read." 


Most  of  you  should  have  the  newer  documentation  by  now. 
COMPUTE  will  continue  to  present  as  much  information 
as  we  can  generate  to  help.   You  new  Atari  owners 
should  remember  to  send  your  programming  articles  and 
advice  to  kelp  other  readers  as  well. 

At  press  time,  we're  still  in  the  midst  of  collecting 
the  results  on  the  Z-80  software  question  posed  on  the 
last  Editor's  Feedback  card.  Many  of  you  raised  the 
question,  "Why  not  develop  a  CP/M  for  the  6502?" 
We'll  pass  full  feedback  along  to  Microsoft  Consumer 
Products,  Commodore  and  you.  Highlights  of  the 
Feedback  card  this  time  include  Best  Article  and 
"Most  Desired  Peripheral".  Thanks  for  taking  the 
time  (and  the  ten  cent  stamp)  to  respond. 

And  finally,  among  the  "other  suggestions": 

"I  like  all  of  COMPUTE;  Keep  going!  Make  it 

monthly!" 

We  're  considering  it. 

"Let's  get  a  high-level  compiler  language  for  the 
PET..." 

"Suggest  more  space  on  this  card..." 

"My  COMPUTE  to  arrive  on  time..." 

More  next  time. . .  Robert  © 


Coming  In  Issue  6 
(September/October): 

Loading  APPLESOFT  Programs  on  Your 
PET 

Teleconnmunications  Overview 

Waterloo  Structured  BASIC  for  the  PET 

Atari  Disk  I/O 

A  User's  Guide  To  Visicaic:  Apple, 

Atari  and  Pet 

The  Educational  Gazette 

Business  Software  Review: 

The  Osborne/McGraw  Hill  Series  for 

Apple  and  Commodore 

And  a  whole  lot  more! 
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COMPUTER  BOOKS  THAT  TALK  YOUR 
LANGUAGE . . .  FROM  BEGINNER  TO  EXPERT 

Howard  W,  Sams  is  the  source  for  the  best  and  latest  in  computer  technology.  The  world's  leading  authors.  Clear, 
concise,  easy-to-understand  tejct.  Fully  illustrated  for  better  comprehension.  Actual  programs  for  today^s  personal 
computers.  Informative  and  entertaining.  Titles  for  everyone.,, from  the  novice  to  the  hobbyist  to  the  expert, 
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THE  STARTERS 

Entry-level  books  for  the  beginner  can 
bring  the  novice  up  to  a  hlgti  level  of 
knowledge  quickly. 


I — I  THE  HOWARD  W.  SAMS  CRASH 
I I  COURSE  11^  MICfiOCOMPUTERS 

The  short  cut  to  undeistond  micfocom- 
pulees  Spend  o  few  hours  with  this  selt- 
tnsftuctionol  course  and  gain  a  working 
knowledge  ot  all  ospecis  of  microcom- 
puters from  fundamentals  to  operoling 
systems,  programming,  perlphera 
eQulpmeni  and  much,  mucli  more.  264 
pages  No  21634  By  Frenzel  317  50 

MICROCOMPUTERS  FOR  BUSINESS 
APPLICATIONS 

A  microcompute:  expert  discusses  the 
benefits  of  microcomputer  systems  (or 
small  business  owners-  Exploins  types  of 
microcomputers  available,  points  cut  pit- 
falls to  ovoid.  ond  defines  computer- 
leloted  terms  in  easy-to-understand  lan- 
guage. 256  pages.  By  Batden.  No.  21533. 
S895- 

A  GUIDEBOOK  TO  SMALL 
COMPUTERS 

If  you  are  contempialirtg  buying  a  small 
computer  system  lor  home  or  business, 
this  book  can  save  you  time  and  I:oublB. 
Covers  fundamentals  of  small  comoulers 
including  hdrdwore  and  softwore.  In- 
cludes information  on  monutocturers' 
warranties,  service  and  a  handy  direc- 
tory of  small  computer  manufacturers.  By 
Borden,  rjo.  2169B.  S5.95. 

GETTING  ACQUAINTED  WITH 
MICROCOMPUTERS 

Provides  a  complete  working  knowledge 
of  microcomputer  organization,  opera- 
lion,  onp  programming  288  pages  By 
Frenzel.  f^o.  21486  S8.95 

FUNDAMENTALS  OF  DIGITAL 
COMPUTERS  |2nd  ED.) 

Unrovels  the  mysteries  of  computers  and 
orogromming.  320  pages.  By  Spencer 
No  21534  S995 

INTRODUCTION  TO  MICROCOMPUT- 
ERS FOR  THE  HAM  SHACK 

Gives  the  radio  dmcteur  dn  opportunity 
■0  be  in  the  forefront  of  utilizing  and  de- 
veloping  techniques  in  "com- 
putercotions'  96  pages  By  Helms.  No, 
21681  S4  95. 

LEARN  ABOUT  MICROCOMPUTERS,  SAVE 
10%     AND  GET  A  FREE  GIFT! 

THE  COMPUTER  PRIMER  LIBRARY 

This  3-votume  "starter"  library  was 
selected  for  the  novice  who  wants  to 
learn  about  microcomputers.  Concepts 
Programming.  Computer  graphics,  Lon 
guoges.  Gomes,  By  fvlitchell  Waite  and 
fylichael  Pardee — two  of  the  leodlng 
authors  in  the  field  o(  computers 
MICROCOMPUTER  PRIfvlER— 366  pages 
of  up-to-date  facts  on  microcomputers 
and  computer  concept. 
COI^PUTER  GRAPHICS  PRIMER-  Over  20 
programs  for  creoling  your  own  video 
graphics  (complex  drawings,  plans 
maps,  and  schematics)  on  the  new 
6502-based  personal  computers 
BASIC  PROGRAMrvlING  PRIMER— Provides 
o  working  knowledge  of  BASIC,  the  most 
popular  computer  language  today  Ex- 
plains fundamentols,  ot  BASIC,  program 
control,  orgonizdtion.  oddltionol 
functions,  variations,  and  includes  a 
game  program 

3-VOLUME  LIBRARY  PACKAGE  ONLY 
S30.47  Includes  a  FREE  COPY  ol  YOUR 
OWN  COfvlPUTER  an  mltoduction  to 
home  computers  No  21706 
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THE  PROGRAMMERS 

A  computer  is  only  as  good  as  the 
software.  Sams  offers  several  books  ttiat 
explain  programming  and  fell  you  ;how 
to  develop,  debug  and  test  programs  for 
your  equipment. 
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PROGRAMMING  &  INTERFACING  THE 
4502,  WITH  EXPERIMENTS 
Dr  De  Jong  has  compiled  14  chapters  of 
informotion  and  programs  for  6502-based 
microcomputer  systems  Experiments  and 
examples  ore  written  so  that  a  KIM.  Aifvl  or 
SYTvl  system  may  be  used  to  reinforce  the 
moteriol  in  eoch  chapter  443  poges  3y 
De  Jong.  No  21651,  SlSiJS 

HOW  TO  PROGRAM  AND  INTERFACE 
THE  ABOO 

Discusses  the  internol  structure,  instruction 
set,  and  programming  techniques  for  the 
6800  Experiments  demonstrate  "reol 
world"  applications.  By  Staugaord.  432 
pages.  No.  21684  $13  95. 

DBUG:  AN  6080  INTERPRETIVE 
I  DEBUGGER 

Covers  program  operotion  and  how  its 
applied  to  program  development  arid 
testing.  112  poges  By  Iilus  ond  Titus  No 
21536.  54  95 

6502  SOFTWARE  DESIGN 

Tells  how  to  progrom  for  the  6502 
assembly  longuoge.  288  poges  By 
Sconlon  No  21656  S10  50 

8080/8085  SOFTWAI?E  DESIGN— 2 
VOLUMES 

VOLUME  1  gives  you  on  introduction  to 

ossembly  language  programming.  336 

poges  By  Titus.  Larsen.  Rony.  &  Titus  No 

21541  S9  50 

VOLUME  2  IS  o  unique,  one-of-a-kind 

computer  science  book  for  the  design 

engineer.  Written  in  Intel  machine  code 

352  pages.  By  Titus.  Larsen.  &  Tilus,  No 

21615  S995 

TWO-VOLUME  SET  No.  2i6S9  ONLY  S17  50 

TEA:  AN  8080/6085  CO-RESIDENT 
EDITOR-ASSEMBLfR. 

256  pages  No  21628,  By  Titus,  $8.95, 


THE  COMPUTER 
TECHNOLOGY  LEADERS 

Even  If  you're  an  avid  computet  buff, 
ropldty  ctianging  tecfinology  makes  if 
difficult  to  stay  current.  Sams  has  a 
complete  line  of  books  and  reference 
publications  to  fieip  you  keep  abreast 
ol  ttie  current  slate-of-the-art 
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MICROCOMPUTER-ANALOG 
CONVERTER  SOFTWARE  & 
HARDWARE  INTERFACING, 

Concepts  ond  techniques  ot  interfacing 
digital  computers  to  analog  devices, 
288  poges  By  Titus.  Titus,  Rony  &  Larsen 
No.  21540- S  9  50, 

TRS-80  INTERFACING- 

192  poges  No  21633  By  Tilus  58  95 

INTERFACING  4  SCIENTIFIC  DATA 
COMMUNICATIONS  EXPERIMENTS. 

160  pages.  By  Rony  Larsen,  Titus.  &Titus 
No  21546  S595, 

MICROCOMPUTER  INTERFACING 
WtTH  THE  825S  PPI  CHIR 

224  poges  By  Goldsbrough  No.  21614 
S8,95. 
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Z-60  MICROPROCESSOR 
PROGRAMMING  &  INTERFACING— 2 
VOLUMES. 

BOO  pages   By  Nichols,  Nichols,  &  Rony 
No.  21611,  S21,95. 

INTRODUCTORY  EXPERIMENTS  IN 

DIGITAL  ELECTRONICS  AND  e080A 
MICROCOMPUTER  PROGRAMMING 
AND  INTERFACING— 2  VOLUMES- 

912  pages.  By  Rony.  Larsen.  &  Titus.  No, 
21552,  S  20,95. 


A  BEST-SELLER... 

A  TREMENDOUS  VALUE! 

Tfiis  Is  ttie  most  compretiensive 
reference  available  on  all  pfiases  of 
compufefs  and  Itieir  applications. 
Contains  over  22,000  definitions, 
acronyms,  and  obbrevialions,  14 
appendices.  Hardbound,  944  pages.  By 
Sippi  8i  Sippi.  No,  21632,  $29,95. 


COMPUTER  DICTIONARY  & 

HANDBOOK  (3RD  EDITION) 
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THE  LOGIC  COOKBOOKS 
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LANCASTER'S  COOKSOOK  LIBRARY 

A  famous  resource  loi  all  electonics 

bufts  who  want  to  know  what  mokes  TTLs, 

CfvlOS,  and  octive  filters  cook    what 

they  ore,  how  tt^ey  work  and  how  to  use 

them.  By  Don  Lancaster,  one  of  the  most 

popular  outhors  in  the  etectronics 

industry, 

nL  Cookbook  No,  21035 

CMOS  Cookbook  No,  21398 

Active- Filter  Cookbook  No,  21168 

TOTAL  LIST  PRICE 
less  15%  Discount 
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YOU  PAY  ONLY  $29,71 

ORDER  SPECIAL  UBRARY  PACKAGE 
NO.  21707  AND  SAVEl 


Houuord  UU.  Soms  S  Co.,  Inc. 


ORDER  FORM 

HOWARD  W.  SAI^S  &  CO..  INC. 

4300  West  62  nd  Street.  PC.  Box  7092 

Indianopolls,  Indlona  46206 

(317)  298-5400 

Indicate  quantitv  in  boxes  obove  ai^d  complete 
ordering  information  below 


Add  locoi  soles  toic  where  applicable- 


GIW'tD  tOIAL 

D  PAVtvlENt  ENCLOSED 

□  CHECk    n  MONEY  OROEI) 

D  tvlASlER  CHARGE    n  BANK  AMEB1CAI30/V1SA 

Ekp  Date 


Accourrt  No  - 


interlxink  No  (Master  Ctiorge  ontv)_ 
Minimum  Cre<3il  cord  purchose  510 

Nome  (prinl) 

SignalLire 

Address 


Amis 


Clt¥_ 


_  State- 


_Zip_ 


Prices  sub|ec:t  to  t:tiangs  wittiojl  notice  All  books 
ovailoblB  riorn  Sams  Distributors,  Bookstores,  ond 
CorTiputer  Stores  Offer  good  in  U  S.  onY  In  Canada, 
contoct  Lenbrook  Industries  Ltd ,  Scortxirouflh.  M1H 
1H5.  Ontario,  Canodo. 
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Computers 
and  Society 

David  D.  Thornburg  and  Betty  J.  Burr 

InnovJsion 

P.O.  Box  1317,  Los  Altos,  CA  94022 


Photographs  courtesy  Louise  Burton 


In  his  poem,  "All  Watched  Over  by  Machines 
of  Loving  Grace",  Richard  Brautigan  say.s: 

"I  like  to  think  (and  the  sooner  the  better!) 
of  a  cybernetic  meadow  where  mammals  and 
computers  live  together  in  mutually  programming 
harmony  like  pure  water  touching  clear  sky." 

Well,  Richard,  I  think  we  did  it! 


*for  information  on  the  Peninsula  School  Computer  Project, 

write  to: 

Katie  Thornburg 

Peninsula  School  Computer  Project 

Peninsula  School 

Peninsula   Way 

Menlo  Park,  CA  94025 

**for  more  information  on  ComputerTown,  USA!,  write  to: 

Pat  Cleland 

People's  Computer  Company 

P.  0.  Box  E 

Menlo  Park.  CA  94025 
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Computers  at  the  Learning  Fair  .  .  . 

Each  year  the  Peninsula  School  in  Menlo  Park, 
California  conducts  a  "Learning  Fair"  lor  children, 
parents,  teachers  and  neighbors.  This  year  the  fair 
was  held  on  May  4  and  was  attended  by  more  than 
a  thousand  people  who  came  to  enjoy  the  food  and 
music,  learn  about  solar  energy,  make  kites  and 
candles,  and  to  take  part  in  myriad  other  activities 
including  playing  with  computers.  While  the  computer 
activity  was  a  small  part  of  the  overall  event,  it 
was  an  enjoyable,  if  exhausting,  task  for  those  of  us 
who  put  it  together. 

The  computer  activity  was  planned  by  the 
Peninsula  School  Computer  Project*  (Katie  Thorn- 
burg),  ComputerTown,  USA!**  (Pat  Cleland)  and 
Innovision  (your  faithful  scribe,  DT).  We  intended 
to  present  a  computer  activity  which  was  smoothly 
integrated,  in  spirit,  with  the  other  activities  at 
the  fair,  including  leather  work,  face  painting,  and 
events  naturally  suited  to  a  fair  conducted  in  a 
semi-rural  environment  on  a  beautiful  spring  day.  The 
goal  of  the  computer  activity  was  to  provide  an 
opportunity  for  people  of  ail  ages  to  learn  about 
computers  and  play  games  without  feeling  intimi- 
dated by  these  machines.  This  activity  was  to  be 
used  by  everyone  from  computer  experts  to  people 
who  had  never  before  seen  a  computer  of  any  kind. 

There  were  three  major  tasks  which  faced  us  as 
planners  of  this  event.  First,  we  needed  to  have 
enough  hardware  available  to  give  every  interested 
person  a  chance  to  use  the  machines.  Second,  we 
needed  software  which  was  appealing  to  boys  and 
girls,  young  and  old  alike.  Third,  we  needed 
enough  volunteers  to  help  people  with  the  computers 
and  to  keep  everything  in  working  order. 

Since  we  could  only  provide  eight  computers 
ourselves,  we  sought  additional  support  from  the 
outside.  Through  the  generosity  of  Commodore, 
Atari,  and  Radio  Shack  we  were  able  to  have  more 
than  twenty- five  computers  running  at  one  time.  This 
allowed  us  to  run  one  program  per  machine  -  a 
blessing  when  one  considers  the  time  spent  just 
loading  tapes. 

The  softvvarc  included  stimulating  games  of  many 
types,  with  the  exception  that  no  "arcade"  type 
games  were  used.  Our  reluctance  to  use  arcade 
games  was  based  on  several  factors.  First,  the 
majority  of  arcade  games  with  which  we  were 
familiar  were  sufficiendy  "addictive"  to  certain 
children  (primarily  boys)  that  we  could  envision 
problems  in  providing  easy  access  to  the  computers. 
More  importantly,  these  games  generally  rccjuire  very 
little  cognitive  activity  on  the  part  of  the  player, 
and  were  thus  not  considered  appropriate  for  incor- 
poration in  a  "learning"  fair.  The  most  compelling 
argument  against  the  use  of  these  games,  however, 
is  that  we  were  able  to  find  a  tremendous  number 
of  games  which  were  fun,  mentally  stimulating,  and 
appealing  to  people  with  little  or  no  previous 


exposure  to  computers.  This  software  included  adven- 
ture games  like  TAIPAN  and  QUEST,  logic  games 
like  BUTTON  BUTTON,  BRAIN  BUSTER, 
QWERT,  and  MOTIE,  simulations  like  LEMON- 
ADE, word  games  like  WORDSEARCH,  and 
creative  environments  like  DRAW,  just  to  mention 
a  few  of  the  programs  which  were  in  use  that  day. 

We  received  tremendous  assistance  from  the  many 
volunteers  who  kept  everything  running  smoothly. 
Volunteers  included  interested  parents  and  several 
local  computers  professionals  who  enjoy  working 
with  children.  This  support  allowed  us  to  set  aside 
a  few  machines  for  visitors  who  wanted  to  learn  a 
little  about  computer  programming.  We  also  set 
aside  two  computers  for  the  exclusive  use  of 
pre-schoolers. 

In  addition  to  the  mixture  of  Commodore, 
Atari,  Apple,  and  Radio  Shack  computers,  we  had 
several  "outdoor"  computer  activities  as  well.  Visi- 
tors to  the  computer  area  were  treated  to  the  beauti- 
ful sounds  from  two  Alpha  Syntauri  computer  music 
systems  which  were  set  up  on  Apples  out  under  the 
arching  oak  trees.  Nearby,  children  played  with 
several  "Big  Trak"  programmable  toys  which  were 
set  up  on  special  roadways  outside  the  computer 
rooms.  Several  of  us  have  found  that  these  toys 
(which  behave  similarly  to  a  LOGO  "turtle") 
are  very  well  suited  for  teaching  programming 
concepts  to  youngsters  (In  case  you  wondered.  Big 
Trak  is  a  motorized  device  with  a  keyboard  that 
accepts  programs  up  to  sixteen  steps  long. 
Once  the  program  is  entered,  the  user  presses  GO 
and  watches  the  machine  move  along  a  path  defined 
by  the  program.) 

Next  to  an  information  booth,  we  had  conti- 
uous  showings  of  "Don't  Bother  Me,  I'm  Learning", 
the  film  on  the  use  of  computers  in  schools  which 
appeared  on  PBS  earlier  this  year. 

The  smooth  mixture  of  all  these  activities  blended 
in  with  the  leather  work,  crafts,  music,  food,  and 
other  activities  of  the  Learning  Fair  to  create  a 
truly  magical  environment. 


Coming  next  month  .  .  . 

By  tht  time  you  read  this,  liit:  .second  Scnii- 
Annual  Consumer  Electronics  Show  will  have  been 
held  in  Chicago,  we  will  have  finished  reading 
Alvin  Toffier'-s  new  book.  The  Third  Wave,  and  wc 
shutild  have  our  hands  on  two  pieces  of  federal 
lcgi,slation  which  are  pertinent  to  the  world  of 
personal  computers.  Any  or  all  of  these  topics  will 
be  discussed  in  our  next  column.  Most  importantly, 
we  want  to  hear  from  you.  Write  us  at  the  address 
sliuwn  at  the  bes,nnning  of  the  column  and  let  us 
know  what  you  think  about  the  social  impact  of 
computers. 
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An  Interview  With  Dr.  Chip 


Robert  Lock,  Editor 

As  past  readers  know,  Dr.  Chip  is  Professor  of  6502  science  at 
Figmenl  U.,  a  Utile  known  but  widely  respected  branch  of 
academia  that's  devoted  to  the  study  of  various  happenings  in 
our  industry.  From  time  to  time  he  contributes  to  these  pages: 
RCL:  Dr.  Chip,  you  sounded  awfully  excited  when 
you  called  at  three  this  morning. 

Chip:  I'll  say.  My  West  Coast  sources  have  just  un- 
covered a  major  manufacturer  planning  to  enter  the 
6502  market.  That  always  gets  me  excited. 
RCL:  Can  you  share  the  details? 
Chip:  They're  incomplete,  but  I'll  tell  you  what  I 
know  so  far.  Mattel  Electronics  Division,  the  manu- 
facturers of  the  Intellivision,  are  adding  what's  been 
billed  as  an  "intelligent"  keyboard  to  their  unit. 
It's  scheduled  to  be  released  in  the  Fall,  with  full 
production  by  early  1981. 

RCL:  That's  certainly  news  Dr.  Chip,  but  they've 
been  showing  off  the  intelligent  keyboard  for  several 
months. 

Chip:  True  enough,  but  what  they  haven't  been 
showing  off  is  that  the  unit  is  6502  based,  and  is 
adding  Microsoft  Basic  to  the  Intellivision. 
RCL:  I  sec  why  you're  excited.  Any  specifics? 
Chip:  Reliable  sources  indicate  the  unit  will  be 
supplied  with  8K  Microsoft  in  ROM,  and  16K  of 
random  access  memory.  Final  details  on  pricing  and 
delivery  aren't  yet  available. 
RCL:  Will  you  keep  us  posted  Dr.  Chip? 
Chip:  I  expect  to  have  a  complete  set  of  information 
for  a  future  issue.  We've  placed  the  Santa  Clara 
chapter  of  the  Figment  U.  6502  Users  Group  on  full 
alert,  and  they're  out  scrounging  for  news  now. 
RCL:  Thank  you  Dr.  Chip.  We'll  look  forward  to 
your  further  comments  next  time. 
Chip:  I'm  not  finished. 
RCL:  Excuse  me.  .  , 

Chip:  Mattel's  not  the  only  company  that's  been 
active  lately.  Atari  is  gearing  up  for  some  new  hard- 
ware and  software  introductions  as  well.  By  the  time 
your  readers  see  this,  Atari  will  have  introduced 
at  least  one  new  piece  of  hardware  at  the  summer 
Consumer  Electronics  Show  in  Chicago.  Rumor  has  it 
they'll  be  showing  off  the  dual  drive,  dual  density 
disk  for  their  machine,  as  well  as  some  new  software, 
including  a  general  accounting  package. 
RCL:  That  sounds  exciting.  What  have  Commodore 
and  Apple  been  up  to? 

Chip:  Well,  you  know  that  Apple  introduced  the 
Apple  3  in  the  NCC.  (Editor's  note:  See  the  review 
and  commentary  this  issue...)  They  certainly  are  going 
after  the  loyalty  of  their  users  and  dealers  in  a  big 
way.  They  even  rented  Disneyland  for  one  whole 
evening  and  passed  out  free  tickets  at  their  booth! 
RCL:  And  Commodore? 


Chip:  Ah  well.  They're  my  personal  specialty  you 
know.  Lots  has  been  happening  there.  I've  been 
struggling  to  keep  up.  Since  last  issue,  they've  been 
through  some  major  changes.  And  let  me  emphasize 
major.  They've  completely  revamped  their  marketing 
structure  in  the  US.  The  whole  US  sales/marketing 
organization  has  now  been  relocated  to  Norristown, 
PA  from  Santa  Clara,  CA.  That's  a  big  move,  but 
even  bigger  is  the  fact  they  they've  revamped  and 
replaced  most  of  their  marketing  team.  All  the  way 
up  to  ii  new  General  Manager  for  US  Sales  and 
Marketing.  They're  setting  up  regional  v\arehouses/ 
distribution  centers  all  over  the  country,  and  have 
indicated  a  whole  new  range  of  services  and  commit- 
ment to  their  dealers. 

RCL:  Frankly  Dr.  Chip,  (hat  sounds  familiar. 
Chip;  I  know,  I  know...  but  dealers  who've  been 
involved  with  the  new  team  are  telling  me  it's 
really  true. 

RCL:  I've  been  hearing  some  beefs  at  this  end. 
Chip:  That's  the  kicker.  In  the  midst  of  all  these 
new  changes...  and  I'll  have  to  say  I  think  it  looks 
good,  there's  a  growing  controversy  over  changes  in 
the  boards.  You  see,  when  Commodore  introduced 
their  new  standard  keyboard  machines,  they  used 
essentially  the  same  primary  board  for  all  three 
machines:  the  8K,  the  I6K  and  the  32K.  End  users 
and  dealers  quickly  discovered  that  one  could 
easily  expand  and  upgrade  a  machine,  making  use  of 
the  plated-thru  (but  soldered  over)  holes  in  the 
board,  by  adding  RAM  chips.  The  units  are  designed 
for  expansion  by  plugging  in  additional  memory 
boards  on  the  memory  expansion  port,  and  Commo- 
dore is  taking  the  position  that  this  is  (he  approved 
method  of  expansion.  To  reinforce  that  approach, 
or  perhaps  I  should  say  to  "enforce"  that  approach, 
they've  begun  drilling  through  the  in-place  traces  in 
the  board  that  were  previously  used  by  dealers  and 
users  to  expand  their  machines.  The  bottom  line  is 
that  all  8K  and  16K  units  shipped  for  the  past 
several  weeks  ha\'e  had  four  3/8  inch  holes  drilled 
through  the  second  row  of  traces  in  the  CPU  boards. 

There  appear  to  be  two  current  schools  of  thought 
on  this  activity.  Commodore  defends  themselves  with 
the  position  that  they've  always  sold  three  distinct 
models  of  machine  with  a  memory  ex])ansion  port 
provided  for  upgrading  8K  and  16K  machines.  They 
also  maintain  that  they've  never  condoned  or  en- 
couraged the  alternate,  cheaper  method  of  expansion. 

The  alternate  view  of  the  process  is  that  Commo- 
dore is  multilating  perfectly  good  boards  to  prevent 
the  more  inexpensive  method  of  upgrading  8K  and 
16K  machines  by  adding  RAM.  It  appears  that  a  part 
of  Commodore's  motivation  was  the  result  of  a  group 
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of  dealers  who  began  ordering  only  small  machines 
and  then  upgrading  them  for  sale  as  16K  or  32 K 
machines.  They  considered  this  essentially  dishtjnest, 
with  some  justification  I  guess.  The  people  who  bear 
the  greater  impact  of  this  change  are  those  dealers 
and  end  users  who  sold  or  bought  machines  on  the 
basis  of  an  expectation  of  future  internal  expandability. 
Not  with  any  intent  to  cheat  Commodore  or  their 
clealcrs  but  rather  with  a  perfectly  reasonable  desire 
to  economize  and  build  on  their  system(s)  as  money 
and  time  permitted.  I  think  it's  a  matter  that  will 
take  some  time  to  resoKe.  And  it  points  out  one 
of  the  major  problems  with  Commodore  in  the  past...  a 
failure  to  act  from  an  informed  perspective.  The  drilled 
out  boards  simply  started  showing  up  at  dealers.  I 
assume  some  of  the  larger  companies  may  have  known 
about  the  change,  but  the  smaller  ones  certainly  didn't 
It  was  obvious  from  the  phone  calls  we  received 
that  Commodore  had  not  bothered  to  inform  their 
dealers  or  distributors  of  the  pending  change. 
RCL:  That's  the  worst  part  of  the  whole  thing. 
I  got  a  lot  of  complaints  from  dealers  as  they 
realized  what  was  going  on.  I've  written  to  Commo- 
dore and  talked  to  their  new  General  Sales  and 
Marketing  Manager,  Dick  Powers,  and  I  think  he's 
in  the  unfortunate  position  of  landing  in  his  new 
job  just  in  time  to  meet  the  proverbial  frying  pan. 


He  defends  the  decision  as  a  nt'iessary  one.  and 
one  clearly  cunsistenl  with  the  original  intent 
and  goals  ol  the  product  line.  But  he  candidly 
admits  the  failure  in  the  process...  not  seeking 
dealer  input;  not,  at  the  least,  giving  dealers  60  to  ^'0 
days  notice  of  the  change,  and  ,s(j  on.  He  comes  irom 
a  background  of  national  sales  Ibrce  management 
and  appears  to  clearly  understand  the  problems 
and  confusion  caused  by  "unilateral"  happenings 
from  on  high.  My  opinion  is  that  Commodore 
should  rethink  the  whole  thing,  but  shint  ()f  that, 
should  clarify  the  hap|x-nings  for  their  dealer  and 
end-user  network.  It  appears  that  this  will  be  the 
future  course  of  Dick  Powers,  and  I  wish  him  well  in 
building  that  network  of  dealer  trust  and  support. 
He  inherited  a  situation  not  ideal  for  a  new  beginning, 
but  seems  determined  to  build  new  strength  and  loyalty 
at  the  dealer  le\el.  Time  will  tell,  of  course.  You 
dealers  can  start  the  process  rolling  by  writing  to 
him  at  this  address: 

Mr.  Dick  Powers 

Commodore  Business  Machines,  Inc. 

Computer  Sales  Division 

950  Riitenhouse  Road 

Norristown,  PA  19401 

Conlinui'  to  kee])  me  ])osled  on  your  [irogress.  RCL  C 
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Guest  Commentary 

BUSINESS 
APPLICATIONS 
ANALYSIS--THE 
MISSING  STEP 

Hal  Wadleigh 

Business  applications  analysis  seems  to  be  the  most 
neglected  clement  of  the  microcomputer  industry 
today,  The  shame  of  it  is  that  the  principles  of 
business  analysis  affect  almost  every  phase  of  the  use 
of  microcornputers  in  the  business  environraent--from 
the  initial  choice  of  equipment  to  evaluating  programs 
in  use.  The  root  of  the  problem  appears  to  lie  in 
the  history  of  microcomputer  software. 

A  short  time  ago,  there  was  little  or  no  business 
software  available  for  the  smaller  microcomputer 
systems.  The  software  market  was  Hooded  with  games, 
but  programs  that  do  anything  useful  for  businesses 
were  few  and  far  between.  When  business  programs 
could  be  found,  they  were  unfortunately  lacking  in 
the  qualities  that  make  "good"  software  distinct 
from  "bad"  software.  Now  that  the  systems  have  been 
out  for  a  while,  the  quantity  of  business  packages 
available  is  greatly  improved.  The  bad  news  is  that 
the  quality  of  this  software  (with  a  few  notable 
exceptions)  is  as  poor  as  ever. 

Both  of  these  situations-the  plethora  of  games  and 
the  low  quality  of  business  software— seem  to  be  related 
to  the  way  in  which  most  microcomputer  programs 
are  developed.  The  programmer  gets  an  idea  and  sits 
down  to  start  coding.  This  approach  is  ideal  for 
games  because  any  interesting  oddities  that  occur 
during  this  rather  non-objective  procedure  can  be 
incorporated  into  the  game  to  make  it  more  interesting. 
This  is  also  the  worst  procedure  possible  for  business 
programming. 

The  nature  of  games  is  that  they  don't  have  to 
do  anything  in  particular  (except  hold  the  player's 
interest)  and  the  job  itself  can  be  redefined  to 
accommodate  any  discoveries  made  during  the  program- 
ming process.  In  this  case,  the  program  is  more 
important  than  the  job  it  is  supposed  to  do! 

Business  programs,  however,  arc  the  exact 
opposite— the  job  is  everything  and  elegant  pro- 
gramming is  almost  meaningless.  A  good  business 
program  is  one  that  does  the  job  well.  A  bad 
business  program  is  one  that  does  the  job  poorly. 
The  elegance  and  sophistication  of  the  program  does 
not  matter.  Successful  games  are  usually  programs 
that  continually  surprise  and  amaze  the  user.  Business 


programs  had  better  NOT  surprise  and  amaze  the 
user. 

The  principles  of  business  applications  analysis 
are  really  quite  simple.  It  does  not  take  a  great 
deal  of  intelligence  or  education— just  a  little  control. 
It  is  a  five  step  process: 

STEP  #1:  DEFINE  THE  JOB 

It  is  not  too  unusual  to  hear  a  small  businessman 
say  something  like  "I  bought  one  of  those  little 
computers  last  year.  What  do  you  think  I  ought  to  do 
with  it."  It's  a  rather  amazing  statement  when  you 
think  about  it.  The  man  has  a  tool  and  would  like  to 
know  what  kind  of  job  to  do  with  it.  The  proper 
procedure  is  to  buy  the  tool  that  best  fits  the  job 
that  needs  to  be  done--it  doesn't  matter  if  we're 
talking  about  hammers  or  computers. 

Any  computer  is  a  tool  for  processing  informa- 
tion. Defining  the  job  for  a  computer  is  usually 
a  simple  matter  of  completing  the  sentence  "I 
want  to  get.  .  ."  with  a  detailed  description  of 
what  will  be  the  output  of  the  system. 

This  step  is  often  called  the  OUTPUT  SPECI- 
FICATION Y^h^sfi. 

STEP  #2:  DEFINE  THE  INFORMATION 
NECESSARY  TO  DO  THE  JOB 

No  computer  will  create  new  information.  A  computer 
will,  however,  change  the  form  of  information  that 
is  available  to  it  into  a  more  useful  form.  For 
example,  a  file  available  to  the  computer  might  have 
a  lot  of  records  on  items  in  a  business'  inventory. 
Each  one  of  these  items  has  the  informadon  on  what 
the  value  of  the  items  are  individually  and  a  count 
of  how  many  of  these  items  are  in  stock.  The  computer 
can,  whenever  necessary,  take  these  individual  items 
of  information  and  produce  that  information  in  the 
form  of  a  statement  that,  "Current  inventory  is  worth 
$9875.42"  on  a  display.  This  is  not  really  a  matter 
of  producing  new  information— since  the  information  is 
already  contained  in  the  individual  inventory  items. 
The  computer  has  simply  changed  the  form  of  that 
information  into  something  more  desirable. 

Since  we  have  already  defined  the  job  we  want 
the  computer  to  do,  we  now  have  to  define  the 
information  that  the  computer  will  need  to  do  that 
job.  This  often  involves  a  bit  of  research.  The 
person  who  does  this  part  of  the  anlysis  has  to  know 
how  to  do  the  job  itself.  It  also  usually  involves 
finding  out  the  exact  form  the  information  is  in  when 
it  becomes  available  to  the  people  who  will  be 
operating  the  computer. 

This  step  is  often  called  the  INPUT  SPECIFICA- 
TION phase. 

STEP  #3:  DEFINE  THE  INFORMATION  TO  BE 
STORED 

Some  of  the  information  necessary  to  do  the  job 
will  be  needed  over  and  over  again.  It  is  silly  and 
wasteful  to  require  operators  to  enter  this  information 
every  time  it  is  needed.  Sometimes  the  job  itself  is 
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simple  data  retrieval— looking  at  stored  information. 
This  is  the  step  where  the  information  that  should  be 
stored  is  defined.  In  this  step,  you  decide  the  number  of 
data  files,  the  form  of  each  data  record  in  the  file, 
and  even  the  size  of  the  file. 

This  step  is  often  called  the  FILE  SPECIFICATION 
phase. 

STEP  #4:  DETERMINE  THE  PHYSICAL  FLOW 
OF  THE  INFORMATION 
Business  applications  are  a  matter  of  getting  the 
right  information  to  the  right  place  at  the  right  time. 
If  the  computer  is  going  to  be  printing  reports  in 
the  accounting  office  and  the  information  is  needed 
at  the  loading  dock,  then  the  system  specifications 
have  to  include  a  means  of  getting  that  printed  report 
to  the  loading  dock.  This  step  will  be  almost  meaning- 
less in  some  applications— but  it  will  be  the  most 
critical  step  in  others.  In  either  case,  it  cannot  be 
ignored—even  if  it  seems  to  be  unimportant  at  first 
glance. 

This  step  is  often  called  the  WORKFLOW  SPECIFI- 
CATION p\^a&t. 

STEP  #5:  DEFINE  THE  TIME  CONSTRAINTS 
OF  THE  OPERATION 

Since  we  are  dealing  with  a  system  that  has  to  get 
the  right  information  to  the  right  place  at  the  right 
time,  we  need  to  make  some  rather  exact  definitions 
of  the  tolerable  delays  for  each  step  of  the  job.  It 
would  be  silly  to  define  a  system  that  has  to  sort 
large  files  in  many  different  ways  without  allowing 
enough  time  for  these  sorting  operations.  It  would  also 
be  silly  to  try  to  function  without  such  sorting 
operations  if  they  are  critical  to  the  operation  itself. 
This  final  step  is  often  called  the  RESPONSE  TIME 
SPECIFICA  TION  PHASE. 

This  constraints  defined  in  this  stage  may  show 
that  the  previous  steps  have  resulted  in  a  system 
design  that  simply  cannot  work  fast  enough  to  do  the 
job.  This  could  necessitate  doing  one  or  more  of  the 
earlier  steps  over  until  all  five  steps  conclude  with 
a  acceptable  applications  design, 
THE  FINAL  RESULT -SYSTEM  SPECIFI- 
CATIONS 

Now  that  you  have  completed  these  five  steps,  you 
have  some  idea  of  what  you  are  looking  for.  You 
still  haven't  chosen  any  equipment  and  you  haven't 
even  designed  any  programs--but  you  DO  have  a 
complete  definition  of  the  exact  job  to  be  done- 
and  that  is  the  most  critical  point: 
YOU  CANNOT  BUY  AND  PROGRAM  A  COMPUTER 
TO  DO  A  JOB  UNLESS  YOU  KNOW  EXACTLY 
WHAT  THE  JOB  IS!!!! 

Unless  you  have  gone  through  this  process,  you  don't 
really  know  what  the  job  is  and  you  can't  really  make 
any  informed  decisions  about  equipment  or  program- 
ming. The  end  results  are  all  too  often  either  comical 
or  tragic. 


The  general  impression  of  many  computer  pro- 
fessionals is  that  micro  systems  are  toys  and  that 
micro  software  is  limited  to  games  and  junk.  There 
is  an  uncomfortable  amount  of  truth  to  that  view-- 
due  to  the  haphazard  way  in  which  micros  have  been 
used.  If  people  in  the  microcomputer  industry  begin 
using  their  tools  properly,  that  attitude  will  change. 
It  will  soon  become  obvious  that  mainframe  systems 
are  needlessly  expensive  behemoths  and  that  main- 
frame software  is  archaic  and  oversensitive  to  small 
errors. 

The  real  microcomputer  revolution  will  begin 
when  microcomputers  arc  used  properly— and  defining 
the  job  to  be  done  is  always  the  first  step  to  proper 
use.  © 
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DATA  HANDLING  SOFTWARE 

Apple  II  and  Pet  users.  A  disk  oriented  data 
manager  software  package.  Easy  data  file 
creation  and  powerful  record  hiandling.  User  can 
sort,  merge,  add,  delete,  update,  view,  print, 
write  data  files  and  more.  Special  features  in- 
clude mass  updating  and  sorting  by  fields.  Code 
is  easily  modified.  Excellent  for  office  use! 
Package  includes  software,  floppy  disk,  docu- 
mentation, and  example  applications  for  only 
$18.50  ppd.  For  information  write  to:  Business 
Computer  Services  Co.,  10805  Mackey,  Gnit  D, 
Overland  Parks,  KS  66210 
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An  Introduction  to  Small  Business 
Software  for  the  PET*.  D. 

Can  DR.  DALEY's  offer  a  better 
Mailing  List  Maintenance  System? 


You've  seen  them  all!  Every  software  sup- 
plier offers  a  mailing  list  system  of  some 
son  or  another.  Each  of  them  has  some  ad- 
vantages and  some  disadvaniaees  over  the 
others. 

So  when  DR.  DALEY's  decided  to  offer 
a  mailing  list  we  felt  that  it  had  to  offer 
some  other  advantages  over  all  of  the 
others.  We  have  offered— and  sold 
some — mailing  list  systems  before,  but 
these  offer  few  things  that  makes  them 
unique. 

SERIOUS  BUSINESS 

When  you  wish  to  purchase  a  software 
sy.stem  for  any  business  purpose  you  need 
to  give  it  serious  and  thorough  considera- 
tion. What  do  you  wish  to  accomplish  with 
the  software?  What  are  your  needs?  How 
can  a  computer  assist  you  in  filling  these 
needs?  We  have  asked  these  questions 
numerous  times  to  people  who  do  mailings 
with  lists  in  the  size  range  of  500  to  15,000 
names.  The  result  was  unanimous;  every- 
one has  different  information  needs.  This, 
of  course,  means  that  everyone  who  buys  a 
mailing  list  system,  or  any  other  business 
software,  must  find  a  program  that  comes 
closest  to  his  needs.  This  is  a  lime  consum- 
ing,  expensive  task.  We've  talked  with 
businessmen  who  have  become  frustrated 
with  this  process  and  are  ready  to  throw  in 
the  towei.  Another  option  is  to  hire  a  pro- 
grammer to  write  the  software  for  you  or  to 
write  your  own.  This  can  cost  more  than  the 
cost  of  the  computer. 

The  last  option  is  to  find  prepackaged 
software  which  each  individual  user  can 
easily  configure  to  his  own  needs.  This 
would  allovv  each  business  to  customize  its 
own  computer  maintained  mailing  list  files 
to,  as  closely  as  is  possible,  parallel  the  cur- 
rent mailing  list  operation.  Until  now,  this 
option  has  been  virtually  impossible  to 
fulfill,  from  any  software  publisher. 

IMPLEMEiNTATfON 

Our  computerized  mailing  list  system  is 
designed  to  be  easy  for  you,  the  user,  to  be 
able  to  easily  configure  your  files  to  contain 
information  in  much  the  same  way  as  you 
currently  are  doing.  This  means  less  of  the 
pain  and  anguish  that  frequently  accom- 
panies computerization. 

During  the  programming  the  author  was 
in  frequent  cotttact  with  potential  end 
users.  The  main  thought  during  the 
development  phase  was  to  make  the  opera- 
tion easy  to  understand,  yet  powerful 
enough  to  handle  the  job.  Give  the  user  as 
many  options  as  is  feasible,  with  the  flex- 
ibility to  make  the  greatest  possible  use  of 
the  file  information.  Finally,  be  sure  that 


the  capacity  of  the  system  is  sufficient  to 
allow  most  any  business  to  make  use  of  it. 
The  final  version  will  allow  records  of 
117  USABLE  characters  in  length  with  a 
maximum  of  15  fields  within  each  record.  It 
also  allows  reasonably  large  capacity  with 
multiple  diskette  (maximum  of  100  dis- 
kettes on  a  32K  PET  or  CBM)  files  and  up 
to  1340  records  per  diskette. 

WHAT  ABOUT  .SORTI.NG? 

We  hear  this  question  most  frequently 
from  you.  This  is  because  sorting  is  the 
operation  that  divides  the  MAILING  LIST 
system  from  any  mailing  list  system.  Why 
sorting?  Well  it  is  the  way  that  the  user  can 
do  such  things  as  selective  mailings  to 
groups  with  common  characteristics.  This 
could  include  regional  mailings,  mailings  to 
customers  of  a  particular  product,  mailings 
to  purchasers  or  to  prospective  customers, 
etc.,  etc.  Or  you  might  wish  to  make  any 
possible  coinbination  of  these  categories. 

Try  to  do  this  on  most  ordinary  mailing 
list  programs.  You  simply  can't  do  it  with 
most  of  the  offerings  on  the  market  today. 
This  sorting  is  done  by  a  "wild  card" 
type  of  sort.  This  means  that  you  can 
specify  the  contents  of  any  portion  of  a 
field  for  a  match  and  the  computer  will  take 
any  match  for  the  rest  of  the  field.  This  type 
of  sort  is  best  illustrated  with  the  following 
examples: 

A  sort  key  can  be:  *»R**i 
Matches  with  FORT/yi 
and  T4R32I 
and  %/R@i\ 
Our  system  allows  this  type  of  sorting  using 
up  to  three  fields  within  each  record.  Thus 
you  should  be  able  to  retrieve  almost  any 
conccivabie  subset  of  the  files. 

File  organization  is  done  using  two  of  the 
fields  as  sort  keys.  This  again  is  user  select- 
able. You  could,  for  example,  specify  that 
you  wish  the  file  to  be  in  ZIP  CODE  se- 
quence or  in  alphabetical  sequence  and  all 
records  within  the  file  will  be  sequenced 
with  that  field.  There  is  also  a  second  sort 
field  which  is  used  to  sequence  the  file 
where  the  first  field  is  the  same. 

WHAT  ABOUT  LABELS? 

We  hear  this  one  almost  as  often  as  the 


Charge  to 
your 

MC/VISA 


r 


master  charge 


5J 


sorting.  Well,  here  this  is  up  to  you.  You 
can,  at  the  time  you  print  labels,  choose  the 
layout  of  the  labels,  you  can  also  choose  the 
number  of  labels  per  line.  If  you  wish  to 
have  a  four  line  address  and  printed  four 
records  wide  you  can  do  it, 

WHAT  ABOUT  EDITING? 

Editing  is  accomplished  at  several  points 
in  the  program.  These  are  at  the  time  of  en- 
try, before  saving  the  records  to  the  file  and 
from  the  disk  file.  You  can  easily  modify 
any  record  at  any  of  these  points. 

This  does  not  really  cover  all  of  the 
operations  on  the  files.  Space  simply  does 
not  allow  a  more  complete  description  of 
the  user  oriented  approach  of  the  program. 

We  asked  the  question:  Can  we  offer  a 
better  mailing  list  system?  You  bet  we  can! 
It's  here  now. 

HARDWARE  REQUIREMENTS 

At  present  this  requires  a  Commodore 
PET  or  CBM  coiTiputer  with  a  dual  disk 
drive  and  a  printer.  It  is  set  up  to  work  with 
the  Commodore  printer  or  with  most  any 
other  printer.  Watch  for  these  programs  to 
be  introduced  for  use  with  other  types  of 
popular  microcomputers.  The  APPLE  II 
version  will  be  available  about  June  1 ,  1980. 
Watch  for  it! 

ORDERING 

At  the  present  linie  many  Commodore 
dealers  do  not  carry  our  software.  Thus  you 
will  most  likely  need  to  cither  persuade 
them  to  order  for  you  or  calling  us  directly 
at  (616)  471-5514  anytime  between  noon 
and  9  p.m.  Eastern  time  Sunday  through 
Thursday.  For  only  S99.95  plus  four  per- 
cent tax  in  the  state  of  Michigan,  you  get 
this  powerful,  field  tested,  fully  docu- 
mented program  packaged  in  a  convenient 
three-ringed  binder. 

INVENTORY 

We  must  add  this  note.  There  is  too  little 
.space  to  allow  us  to  describe  the  INVEN- 
TORY system  adequately  here.  Ii  offers  the 
same  flexibility  as  docs  the  MAILING  LIST 
described  above,  but  we  can't  tell  you  much 
more.  Write  or  call  for  details.  It  also  is 
priced  at  $99.95. 


DR.  DALEY'S  Software 

425  Grove  Ave.,  Berrien  Springs,  MI  49103 

Phone  (616)  471-5514 
Sun,-Thurs.  noon  lo  9  p.m..  Eastern  Time 


*Watch  for  it  on  the  APPLE  II. 
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Personal 
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Michael  S.  Tomczyk  conmdjutson 

Atari  doesn  't  especially  like  my  nickname  for  their  400/800  per- 
sonal computer  --  "the  pop-top  computer"  --  but  it's  a  fact  the 
computer  has  a  "pop  top"  where  the  plug-in  RAM/ROM 
cartridges  fit,  part  of  their  innovative  user-proof  system  which 
also  includes  interchangeable  cords  for  the  computer's  various 
peripherals.  Atari  also  has  a  growing  array  of  educational 
and  game  software,  including  the  most  sophisticated  real-time 
simulation  game  (STAR  RAIDERS)  in  the  galaxy  ...  a 
long  way  from  "Pong,  "  the  game  that  started  it  all. 

Atari's  competitors  in  the  personal  computer  market 
chuckle  at  what  they  see  as  the  company's  attempt  to  develop 
the  "home"  computer  market,  in  the  face  of  extensive 
market  research  that  says  the  home  market  won't  "happen" 
for  another  4-5  years.  Does  that  mean  Atari  is  wasting  its 
resources.''  Are  they  really  going  after  the  home  market'^  Or 
are  they  laying  the  groundwork  for  a  broader  marketing 
program.'' 

To  answer  some  of  these  questions,  I  interviewed  Atari's 
new  Vice  President-Sales  &  Marketing  for  Personal  Compu- 
ters --  he's  Conrad  Jutson,  who  came  to  Atari  in  November 
1979  with  a  scant  background  in  computers  but  over  20 
years  experience  in  consumer  electronics  at  G.E.  (12  yrs.), 
Toshiba  (6 yrs.)  and  Texas  Instruments  (3  yrs.). 

Jutson  began  by  describing  what  he  sees  as  the 
outlook  for  the  personal  computer  market;  "Small 
business  in  the  short  run  will  account  for  fifty 
percent  of  the  personal  computer  business,  dollar 
wise,"  he  predicted,  defining  small  businesses  as  those 
with  less  than  SI  million  in  annual  gross  revenues, 
employing  10-15  people,  and  usually  involved  in 
manufacturing  or  a  service-oriented  industry. 
Typically,  they  do  their  bookkeeping  by  hand  through 
a  full  or  part  time  employee,  or  have  it  done  by  a 
local  service.  The  key  to  reaching  this  market, 
Juttson  explained,  is  being  able  to  show  them  that  a 
microcomputer  will  increase  their  productivity  and 
make  the  investment  worthwhile. 

The  second  broad  market  segment  is  the  con- 
sumer market  which,  he  said,  consists  of  hundreds 
of  subsets. 


"If  we  were  to  profile  the  personal  computer 
buyer  in  the  early  80 's,  it  would  be  a  male  or 
female  head  of  household,  most  likely  in  a  managerial, 
administrative  or  professional  position,  typically 
earning  over  $25,000  per  year  and  falling  into  the  25 
to  50  age  bracket.  Most  likely,  this  person  is  already 
familiar  with  what  a  computer  can  do  and  can,  in 
the  home  environment,  identify  a  need  for  computing 
to  address  various  problems  and  functions. 

"There  are  several  millions  of  these  households 
in  the  U.S.  that  fit  into  the  demographics  I've 
described,"  he  continued.  "I  don't  believe  personal 
computers  will  ever  be  an  'impulse  item'  off  the  shelf, 
partly  because  of  the  expense,  so  the  logical  question 
becomes,  'Why  should  I  buy  a  personal  computer 
and  what  will  it  do  for  me?'" 

Jutson 's  answers  to  that  question  —  what  will 
a  computer  do  for  me  --  provided  an  interesting 
way  of  categorizing  the  personal  computer  market  in 
terms  of  function.  His  list  of  personal  computer 
uses  included.  .  , 

1)  Planning  and  Record  Keeping: 

"I  believe  this  type  of  managerial/administrative 
consumer  does  not  pay  enough  attention  to  his  own 
finances  —  this  is  confirmed  by  the  rapid  growth 
of  financial  planning  services.  With  the  rapid  infla- 
tion of  the  past  few  years,  projected  to  continue 
through  the  1980's,  many  consumers  have  found  them- 
selves in  higher  tax  brackets  with  a  higher  cost  of 
living  that  has  made  their  lives  more  and  more  complex 
and  difficult  to  manage.  They've  had  to  cope  with 
budget  planning,  financial  investments,  mortgages, 
loan  payments,  credit  unions,  payroll  stock  plans, 
taxes  and  pensions.  In  this  new  complex  environment, 
consumers  have  to  organize  their  home  record  systems 
like  they  do  at  work  -  on  a  daily,  year-round  basis 
instead  of  just  once  a  year  at  tax  time.  They  have  to 
look  at  their  gross  income,  their  investment  tradeoffs, 
and  I  believe  this  type  of  consumer  can  justify  the 
purchase  of  a  personal  computer  with  the  appropriate 
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software  to  meet  these  various  needs.  .  .given  that 
the  typical  first  purchase  of  a  personal  computer  is 
around  S2000-2200." 

2)  Home  Education: 

The  next  category  of  purchase  that  adds  value  to  the 
computer  is  home  education.  Jutson  noted  that  a 
majority  of  schools  and  colleges  are  requiring  some 
hands-on  computer  experience  and  more  and  more 
schools  are  bringing  computers  into  the  classroom  as 
instructional  aids.  There  is  already  an  enormous 
investment  in  home  education  being  made  by  the 
American  family  --  cutting  across  all  demographic 
strata  --  in  home  courseware,  from  encyclopedias 
to  books.  As  a  supplement  to  classroom  education, 
this  home  courseware  can  be  made  much  more  exciting 
and  "fun"  through  visual  display  and  interaction 
with  a  computer,  Jutson  explained. 

3)  Personal  Development  &  Interest: 

There  is  also,  he  said,  a  huge  market  in  how-to 
books,  all  the  way  from  how  to  fix  your  appliances  to 
learning  foreign  languages.  Literally  hundreds  of 
topics  are  addressed.  Personal  computers  provide  for 
active  hands-on  demonstration  for  all  age  brackets 
and  interests,  and  speed  the  learning  process. 

4)  Interactive  Entertainment: 

Having  purchased  a  personal  computer,  we're  all 
challenged  by  interactive  entertainment,  he  said, 
whether  the  entertainment  is  one  of  skill  or  of  strategy. 
The  sale  of  strategic  board  games  (chess,  backgam- 
mon) never  seems  to  let  up  and  in  the  skill  area, 
the  video  arcades  are  doing  extremely  well.  So  enter- 
tainment accounts  for  a  good  deal  of  software  sales. 

5)  Home  Information/Communications: 

If  we  move  away  from  computation  and  hook  up  an 
interface  and  telephone  modem,  we  now  have  the 
capability  to  hook  up  to  a  timesharing  service. 
Using  the  computer  as  a  terminal  provides  a  capability 
for  dialing  up  and  subscribing  to  a  variety  of  evolving 
services-  Some,  like  Micronet  and  The  source  already 
have  a  fairly  long  menu.  Atari  has  defined  an  informa- 
tion and  communications  strategy  —  obviously  it  will 
leverage  our  installed  base  of  hardware  to  help  our 
users  gain  access  and  may  involve  a  wholly  owned 
subsidiary  like  Warner  Amex  Cable.  Some  of  the 
future  uses  of  this  home  information  system  which  we 
can  envision  includes  news,  stock  data  and  other 
services  which  will  cut  down  driving  time,  mailing 
time,  and  minimize  the  hassle  of  shopping  and  bill 
paying.  It's  a  question  now  of  "getting  the  players 
together,"  he  said,  and  making  it  happen. 

6)  Home  Monitor  &  Control; 

The  decade  of  the  1980's  will  witness  a  growth  of 
consumer  electronic  products  deriving  in  large  part 
from  introduction  of  smart  electronics  into  the  home. 
The  personal  computer  is  the  "leading  edge"  of  these 
products.  By  the  mid-1980's,  he  expects  to  see  dedi- 
cated smart  electronics  —  CPU  devices  which  inter- 
act with  the  electronic  environment  --  in  the  home. 


It's  unlikely  that  we'll  see  one  massive  all-purpose 
CPU  controlling  everything  in  the  home.  It  will 
hapfjen  step  by  step,  beginning  with  stand  alone 
appliances  containing  their  own  microprocessors  and 
other  smart  electronics. 

These  then  are  some  of  the  major  uses  which 
Jutson  foresees  for  personal  computers,  now  and  in 
the  future. 

He  goes  on  to  say  that  the  Atari  product  was 
designed  for  the  consumer,  to  be  easy  to  usc-by- 
consumers,  easy  to  access,  easily  loaded 
(cartridges),  and  easily  connected  (modular  cords). 

"Does  the  end  user  care  about  the  architecture 
of  the  machine?"  he  asked  rhetorically.  "The 
answer  is  no.  What  will  it  do  for  me?  That's 
his  major  concern.  Wc  in  the  consumer  electronics 
business  are  concerned  with  leveraging  technology 
and  bringing  that  technology  to  the  consumer  for 
his  or  her  benefit,  so  why  try  to  scare  the  consumer 
off  by  making  it  so  he  or  she  has  to  have  a  double 
E  or  be  a  computer  programmer  to  utilize  the  full 
capabilities  of  a  persona!  computer?" 

He  drew  a  parallel  between  the  personal  computer 
industry  and  the  home  stereo  industry,  pointing  out 
that  15  years  ago  there  were  1500  hi-fi  salons  in  the 
United  States  and  now  there  are  about  15,000  outlets 
in  the  U.S.  He  feels  that  computer  stores  will  become 
to  the  computer  market  what  hi-fi  specialty  shops  were 
originally  to  the  hi-fi  industry,  and  predicted  that 
a  number  of  stores  will  proliferate  and  become  strong 
chains.  A  parallel  development,  he  said,  is  the  entry 
of  general  merchandisers  such  as  J.C.  Penney  Depart- 
ment Stores  into  the  personal  computer  distribution 
scheme. 

He  emphasized  that  Atari  only  started  shipping 
late  in  the  fourth  quarter  of  1979  and  is  just  getting 
into  the  market  with  its  400/800  computers.  Heavy 
advertising  is  planned  for  the  second  and  third  quarters 
of  1980,  including  a  full  dealer  support  program. 

"Having  just  come  out  of  the  gate  wc  have  to 
and  will  continue  to  have  a  lot  of  things  to  do  to 
strengthen  our  position  in  the  industry,"  he  said. 
"Atari  is  a  young  company  that  has  already,  in  a 
few  years,  achieved  significant  growth  in  consumer 
electronics  products.  We  have  a  vertically  integrated 
manufacturing  capability,  a  marketing  staff  that 
understands  marketing,  distribution,  sales  and  sales 
promotion;  and  a  large  blend  of  research  and  develop- 
ment and  engineering  expertise," 

"We  believe  that  the  Atari  computers  are  different 
because  from  word  one  they  were  developed  to  take 
away  whatever  apprehensions  a  first  time  user  might 
have  and  help  him  or  her  feel  good  about  interfacing 
with  our  product.  With  Atari  computers,  you  don't 
have  to  stop  and  think  before  you  use  them.  Of  course, 
more  and  more  of  the  younger  generation  arc  learning 
to  program  and  work  with  more  sophisticated  applica- 
tions, and  they  will  have  the  capability  of  doing  so 
with  our  product."  *» 
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INTRODUCING 

THE  NEW  IMPROVED 

BUSINESS  ENHANCEMENTS 
COMPUSERVICE  BUSINESS 

SOFTWARE 

FOR 

COMMODORE 


Micro  Mini  Computer  World  Inc.  is  an  execlu-       AND 

sive  distributor  for  the  BUSINESS  SOFT-   *    T^TIT    "I7\ 

WARE  developed  by  Business  Enhance-     f\  ■"^■''^1  jFj 

ments  Compu  service  of  Escondido,  ^ ^__ 

California  COMPUTER 

If  you  are  selling  or  using  the  ^"^  ^"^ 

COMMODORE  BUSINESS  MACH- 
INES or  the  APPLE  computer  systems, 
then  you  should  provide  yourself  and  your 
customers  with  the  MOST  COST  EFFECTIVE  and 
COMPREHENSIVE  business  software  for  a  busi- 
ness computer  system. 

CURRENT  B.E.C.  SOFTWARE 

•  General  Ledger-Master  File  1000  Accounts 
and  Journal  File  4400  Entries 

•  Accounts  Receivable-Master  File  1170 
Accounts  and  Invoice  File  1430  Entries 

•  Accounts  Payable-Master  File  H70  and 
Invoice  File  1430  Entries 

•  Payroll"440  Employees 

•  Job  Costing-1100  Items  Per  Disk 

•  Inventory-1100  Items  Per  Disk 

•  Mail  List/Customer  Information- 1000 

Entries  Per  Disk 
Above  figures  apply  to  CBM  2001  computer 

system  with  32K  CPU  and  2040  dual  disk. 

With  the  new  CBM  8050  Megabyte  disk  the 

volumes  will  be  increased  significantly. 

B.E.C.  SOFTWARE  FEATURES: 

•  Complete  and  total  documentation 

•  Step  by  step  walk  through  on  every  pro- 
gram operation,  with  examples 

•  Each  package  is  MENU  driven  and  uses 
dynamic  load  and  overlay  once  the  initial 
menu  is  loaded. 

•  Examples  are  provided  for  all  reports  and 
other  printed  forms.  All  forms  are  available 
from  New  England  Business  Services  Inc.  (NEBS). 

•  All  input/output  operations  use  random  access 

•  Sorts  are  machine  language  sorts 

•  Programs  are  interactive  with  the  General 
Ledger  and  update  the  GL  automatically. 


B.E.C.  VALUE  ADDED 

BENEFITS  •  Total  commit- 
ment to  the  development  of  excellent 
business  software  for  the 
COMMODORE  and  APPLE  com- 

^'^i       puter  systems. 

CJ'VT'O'T^"!^  |\/rO     •  At  reasonable  rates  Micro  Mini 
k^  ■!■  W3  ■!■  A-ii.»AkJ   Computer  World  Inc.  will  provide 
software  modifications  to  meet  customer  require 
ments.  (Call  MMCWI  for  further  information) 
•  EXTENDED  WARRANTY  which  entitles 
users  to  any  enhancements  to  accounting 
software  during  the  year  of  coverage. 
(Cost  is  $100  per  year) 

Dealers  and  Interested  Parties  may  obtain  a 
copy  of  the  B.E.C.  software  documentation  for 
$25.  If  after  review  you  are  not  interested, 
send  the  documentation  back,  in  re-saleable 
condition,  for  a  full  refund  or  apply  the 
S25  toward  your  first  software  purchase. 

The  NEW  B.E.C.  BUSINESS  SOFTWARE 
requires  a  special  ROM  chip  for  proper 
operation. 

Suggested  Retail  Prices  are: 

1.  Rom  chip  $40  (required  on  any  software 
package) 

2.  Individual  software  package  $150 

3.  All  seven  software  packages  $99 5  (save 
$55) 

DEALER  INQUIRIES  ARE  INVITED 


micro 
mini 


COMPUTER  WORLD  inc 


^°H-. 
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74  ROBINWOOD  AVE. 
(614)  235-SS13 


COLUMBUS,  OHIO  43213 
(614)  235-60Sa 
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VISICALC: 

A  Software  Review 

Joseph  H,  Budge 

There  are  very  few  single  programs  good  enough  to  sell 
computers,  Visicalc  is  one  such  program.  Every 
VisicEilc  user  knows  of  someone  who  purchased  an 
Apple  just  to  be  able  to  use  Visicalc.  One  user  wrote 
down  the  software  specifications  for  Visicalc  and  took 
them  to  IBM,  asking  "Can  you  do  this  for  me?" 
IBM  bid  at  the  job:  Cost  would  be  $30,000  and  it 
would  take  3  years  to  complete  the  software.  Yet 
Visicalc  is  available  in  any  computer  store  today  for 
$150  and  runs  on  $2,000  worth  of  hardware.  More 
computers  have  been  sold  on  its  account  than  with 
any  other  single  software  product.  What  is  Visicalc, 
anyway,  and  why  is  it  so  good? 

In  its  simplest  terms  Visicalc  is  a  numerical 
modelling  program.  The  program  divides  computer 
memory  into  a  matrix  of  up  to  16,256  cells.  Each 
cell  can  contain  a  string  (label)  or  a  number.  So  far 
so  good;  memory  looks  something  like  a  multi- 
dimensional array  in  BASIC.  But  unlike  BASIC  each 
cell  is  displayed  on  the  video  monitor  and  can  be 
related  to  any  other  cell  by  a  mathematical  formula. 
Thus  cell  A13  might  be  the  sum  of  cells  Al  through 
A 12,  while  cell  B13  represents  the  sum  of  the  squares. 
Now  change  the  value  of  one  cell.  Viola!  All  the 
other  cells  are  Instantly  recomputed  to  reflect  the 
change.  Thus  the  user  can  set  up  models  and  inter- 
actively make  changes  to  see  the  results. 

The  cell  and  formula  system  of  memory  organiza- 
tion is  applicable  to  myriads  of  uses.  Financial 
budgeting,  with  its  columns  and  rows  of  numbers, 
fits  in  perfectly.  Visicalc  even  uses  12-digit  preci- 
sion to  allow  accurate  finance  calculations.  Loan 
terms,  sales  projections,  and  profit/loss  statements 
can  be  successfully  modelled  or  analyzed.  But 
Visicalc  isn't  strictly  a  financial  tool.  It's  capabilities 
are  general  enough  to  apply  in  many  other  fields. 
Demographers  can  model  population  trends,  biologists 
can  model  biochemical  systems,  and  physicists  can 
model  nuclear  decay. 

Visicalc  is  best  known  for  simplifying  complex 
business  decisions.  An  acquaintance  of  mine  just 
received  a  substantial  raise  for  the  forecasting 
work  he  started  doing  for  his  employer.  What  the 
employer  doesn't  know  is  that  my  friend  takes  the 
work  home  at  night  and  solves  the  problems  on 
Visicalc  in  10  minutes.  A  large  part  of  Visicalc's 
usefulness  stems  from  its  rather  complex  instruction 
set.  Commands  exist  for  inserting  values  and  setting 
up  formula,  obviously.  Other  commands  control 
screen  display  and  split-screen  displays.  One  part  of 
the  screen  can  be  used  to  play  with  parameters  while 


Editor's  Updalt: 

The  PET/Commodore  version  of  Visicalc  is  expected  to  be 
atimtable  in  July-  Price  is  unknown  at  this  point.   The  Atari 
version  is  expected  to  be  available  sometime  during  third  quarter,  1980. 

Personal  Software  is  currently  reviewing  iheir  wananty  policy.  As 
Joe  points  out,  the  warranty  presently  provides  free  replacemenl 
of  defective  disks  for  90  days.    The  warranty  also  provides  Jot 
replacement  of  a  defective  disk  al  nominal  charge  (SI 5. 00  al 
}'our  local  dealer,  or  $7.50  from  Persona!  Software)  during  the 
first  year  of  ownership.  RCL 


the  other  displays  results.  There  are  commands  to 
allow  cell  and  formulae  replication  as  well  as  mass 
editing  commands.  And,  naturally,  models  can  be 
saved  to  diskette  in  the  event  that  the  user  needs 
to  back  up  a  few  steps. 

Because  of  the  complex  instructions,  Visicalc  is 
certainly  not  for  the  faint-of-heart.  All  instructions 
consist  of  single  or  double  keystrokes  with  minimal 
prompting.  While  this  will  slow  down  beginners,  it 
allows  experienced  users  to  work  very  rapidly,  Visi- 
calc comes  with  excellent  documentation  which  takes 
the  beginner  step  by  step  through  each  instruction. 
After  a  week  of  study  Visicalc  operation  should  be 
second  nature  to  almost  everyone. 

Personal  Software  has  produced  an  excellent  pro- 
duct in  Visicalc.  Unfortunately  their  idea  of  customer 
relations  leaves  a  bit  to  be  desired.  Visicalc  is  sold  on 
an  uncopyable  diskette  with  a  90  day  warrantee.  In 
effect  one  pays  $150  to  use  a  program  whose  per- 
formance after  three  months  depends  on  luck.  Three 
months  is  just  about  the  expected  useful  life  of  a 
heavily  used  diskette.  In  this  author's  opinion  the 
program  should  be  good  for  a  year  or  more.  It  should 
at  least  come  with  a  backup  so  that  business  users 
don't  have  to  suffer  down-time  while  waiting  for  a 
replacement.  Personal  Software  also  touts  their 
Visicalc  Newsletter  in  their  documentation.  As  far  as 
I  can  tell  no  such  thing  exists. 

There  is  a  bug  in  some  versions  of  Visicalc 
which  users  should  be  aware  of.  If  you  use  version 
1.35  or  earlier  to  initialize  a  data  diskette,  your 
diskette  will  not  initialize  properly.  The  volume 
table  of  contents  isn't  set  up  correctly.  When  later 
data  is  written  to  the  disk  it  will  eventually 
overwrite  the  disk  catalog.  When  this  comes  to  pass  all 
the  data  on  that  diskette  will  be  lost.  If  you  have 
an  early  version  of  Visicalc  be  sure  to  use  Apple's 
regular  initialization  routines  instead  of  Visicalc's. 

Overall  I  would  rate  Visicalc  as  an  excellent 
value  for  anyone  with  modelling  to  do.  You  will  be 
surprised  at  how  many  applications  are  possible  once 
the  program  is  in  your  library.  Be  prepared  to  spend 
a  lot  of  time  at  first  studying  the  manual,  and  treat 
that  diskette  like  gold.  Visicalc  is  carried  in  almost 
every  computer  store,  where  excellent  demonstra- 
tions are  also  available.  © 
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NEECO  _  _  _ 

PROUDLY        COMMODORE'S  NEW  8000 

/A/TRODL/CES  SERIES  (80  column)  COMPUTERS 


$1695  (available  May/June '80) 


CBM^"  8050  DUAL  DRIVE  FLOPPY  DISK 

The  CBM  8050  Dual  Drive  Floppy  Disk  in  an  enhanced  ver- 
sion of  the  intelligent  CBM  2040  Disk  Drive.  The  CBIVl  8050 
has  all  of  the  features  of  the  CBM  2040,  and  provides  more 
pow/erful  software  capabilities,  as  well  as  nearly  one  meg- 
abyte of  online  storaga  capacity.  The  CBM  8050  supplies 
relative  record  files  and  automatic  diskette  initialization.  It 
can  copy  all  the  files  from  one  diskette  to  another  without 
copying  unused  space.  The  CBM  8050  also  offers  improved 
error  recovery  and  the  ability  to  append  to  sequential  files. 
HARDWARE  SPECIFICATIONS  FIRMWARE 
Dual  Drives  DOS  version  2.0 

Two  microprocessors  Sequential  file  manipulation 

974K  Bytes  storage  on  two  5.25" 

diskettes  (ss) 
Tracks  70 
Sectors  17-21 
Soft  sector  formal 
IEEE-488  interface 
Combination  power  (green)  and 

error  (red)  indicator  lights 
Drive  Activity  indicator  lights 
Disk  Operating  System  Firmware 

(12K  ROM) 
Disk  Buffer  (4K  RAM) 


Sequential  user  files 
Relative  record  files 
Append  to  sequential  files 
Improved  error  recovery 
Automatic  diskette  initiaiization 
Automatic  directory  search 
Command  parser  for  syntax 
validation 
Program  load  and  save 


CBM"^"  8000  SERIES  BUSINESS  COMPUTERS 

The  new  Commodore  8000  series  computers  offer  a  wide  screen 
display  to  show  you  up  to  80-character  lines  of  information.  Text 
editing  and  report  formatting  are  faster  and  easier  with  the  new 
wide-screen  display.  The  8000  series  also  provides  a  resident  Oper- 
ating Systemt  with  expanded  functional  capabilities.  You  can  use 
BASIC  on  the  8000  computers  in  both  interactive  and  program 
modes,  with  expanded  commands  and  functions  for  arithmetic,  edit- 
ing, and  disk  file  management.  The  CBM  8000  series  computers  are 
ideally  suited  for  the  computing  needs  of  the  business  marketplace. 


SCREEN 

2000  character  display,  organized 

into  twenty-five 

80-column  lines 
64  ASCII,  64  graphic  characters 
3x8  dot  matrix  characters 
Green  phosphor  screen 
Brightness  control 
Line  spacing  1'/?  in  Text  Mode 

1  in  Graphics  Mode 
KEYBOARD 
73-key  typewriter  style  keyboard 

with  graphic  capabilities 
Repeat  key  functional  with 

all  keys 
MEMORY 
CBM  8016:  16K  (15359  net) 

random  access  memory  (RAM) 
CBM  8032:  32K  (31743  net) 

random  access  memory  (RAM) 
POWER  REQUIREMENTS 
Volts:  110V 
Cycles:  60  Hz 
Watts:  100 


SCREEN  EDITING 

CAPABILITIES 

Full  cursor  control  (up.  down 

right,  left) 

Character  insert  and  delete 
Reverse  character  fields 
Overstriking 
Return  key  sends  entire  line  to 

CPU  regardless  of  cursor 

position 

INPUT/OUTPUT 
Parallel  port 
IEEE-48S  bus 
2  cassette  ports 
Memory  and  I/O  expansion 

connectors 
FIRMWARE 
24K  or  ROM  contains: 

BASIC  (version  4.0)  with  direct 

(interactive)  and  indirect 

(program)  modes 
9-digil  floating  binary  arithmetic 
Tape  and  disk  file  handling 

software 


The  8000  Series  will  be  available  May/June  '80 
Model  8016  Model  8032  2040  Dual  Floppy 

Available  Now 

$1495  $1795  $1295 


^  commodore 


Available  June/July 

$395 


CBM'"  IEEE  MODEM 

SPECIFICATIONS 
"Full  or  half  duplex  operation 
■300  bits  per  second 
"Standard  IEEE  488  interface 
'Switch  selectable  originate,  off. 

answer-full  duplex,  test,  half  duplex 
'Visible  indicators  are  transmit  data, 

receive  data,  carrier  ready,  test 
'Frequency  shifted  modulation 
'Bell  103/1 13  compatible 

"Execeptional  performance- 
even  on  noisy  phone  lines" 


VISICALC   FOR  CBM  $150 C^r') 

CBM  is  a  registered  trademark  of  Commodore.  All  prices  and  specifications  are  subject  to  change  without  notice. 


NEECO 

679  Highland  Ave. 
Needham,  MA 
02194 


Mon-Fri  9:30-5:30 
MasterCharge  & 
Visa  Accepted 

(617)449-1760 

Telex:  951021 


MICROAMERICA  DISTRIBUTING 


"Dealer  and  OEM  inquiries  invited" 
21  Putnam  Street 
Needham,  MA 
02194 


(617)449-4310 
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BQSiCQlly      Robert  Lock 

Useful  BASIC 

The  response  to  this  page  in  Issue  #4  was  so  good  that 
we're  making  it  a  continuing  feature.  To  accomplish 
that,  I'll  need  your  help.  Send  in  short,  general 
purpose  programs  to  my  attention.  If  they're  of 
general  interest  and  utility,  and  will  run  on  various 
machines  without  change.s,  I'll  use  them  in  this 
column.  We're  especially  interested  in  programs 
for  home  or  office  application. 

Programs  (continuation  of  the 
thiree  financial  programs  last  issue): 
Marvin  L,  DeJong,  School  of  ttie  Ozorks 

10  REM  PROGRAM  IV-CALCULATES  THE  ANNUAL  -. 

-iPERCENTAGE  RATE  USING  AN  INTERVAL 
15  REM  HALVING  TECHNIQUE 
20  PRINT  "VJHAT  IS  THE  BALANCE  OF  THE  -. 

^LOAN?" 
30  INPUT  BALE 

10  PRINT  "ENTER  YOUR  MONTHLY  PAYMENT." 
50  INPUT  PMT 

60  PRINT  "ENTER  THE  NUMBER  OF  PAYKEMTS." 
70  INPUT  N 
80  IH  =  50/1200 
90  IL  =  0 

100  FOR  J  =  1  TO  20 
110  I  =  (IH+IL)/2 
120  Ql  =  I  *  BAL0 
130  Q2  =  PHT*(1-(1+I) " (-N) ) 
140  IF  01>=02  THEN  IH=I 

150  IF  q1';q2  then  IL=I 

160  NEXT  J 

170  NT=N*PMT-BAL0 

160  APR=1200*I 

190  PRINT  "YOUR  ANNUAL  PERCENTAGE  RATE  -. 

-.IS  ";APR;"%." 
200  PRINT  "YOUR  INTEREST  IS  5", -NT 
210  END 

WHAT  IS  THE  BALANCE  OF  THE  LOAN? 

73000 

ENTER  YOUR  MONTHLY  PAYMENT, 

7143.79 

ENTER   TEJE    NUMBER   OF    PAYMENTS. 

723.2123282 

YOUR  ANNUAL  PERCENTAGE  RATE  IS  10.8000279  %. 

YOUR  INTEREST  IS  S  337.700674 


10  REM  PROGRAM  V-CALCULATES  THE  PAYMENT  -. 

-lEIZE  FOR  ADD-ON  INTEREST 
20  PRINT  "HOW  MUCH  WAS  YOUR  LOAN" 
30  INPUT  BAL0 
40  PRINT  "HOW  MANY  MONTHLY  PAYMENTS  -. 

-.MUST  YOU  MAKE" 
50  IMPUT  N 
60  PRINT  "WHAT  IS  YOUR  ADD-ON  INTEREST  -. 

-.RATE  IN  PERCENT" 
70  INPUT  I 
80  1=1/100 
90  H=N/12 
100  NT=BAL0*M*I 
110  PHT=(BAL0+NT)/N 

120  PRINT  "YOUR  PAYMENTS  VJILL  BE  S " ;  PMT 
130  PRINT  "YOUR  INTEREST  ON  THE  ENTIRE  -, 

-.LOAN  IS  S";NT 
140  PRI>JT  "IF  YOU  WANT  TO  KNOW  THE  ^ 

lANNUAL  PERCENTAGE  RATE,  EXECUTE  ^ 

-.PROGRAM  IV.  " 
150  END 

HOW  MUCH  WAS  YOUR  LOAN 

74400 

HOW  MANY  MONTHLY  PAYMENTS  MUST  YOU  MAKE 

736 

WfiAT    IS    YOUR   ADD-ON    INTEREST    RATE    IN 

PERCENT 

77. 2S 

YOUR  PAYMENTS  WILL  BE  S146.B05556 

YOUR  INTEREST  ON  THE  ENTIRE  LOAN  IS  S957 

IF  YOU  WANT  TO  KNOW  TtJE  ANNUAL 

PERCENTAGE  RATE,  EXECUTE  PROGRAM  IV. 


•  •ECXCo«  • 

Specializing  in 
peripherals  and  software 
for  the  PET 

We  offer  the  following 
new  products 

Tull  lEEE-488  Bus  Acoustic  MODEM  .  .  .  $395.00 
Tull  IEEE-488  Bus  to  Centronics  or  NEC  Spin- 
writer  Interface   COM-PLICATIONS  Model  ClOl 

$225.00 

*Full  IEEE-488  Bus  to  Watanabe  Graphics  Plotter 
Interface  COM-PLICATIONS  Model  C102  $295.00 
'Watanabe    MIPLOT    Intelligent    Graphics    Plotter 

Watanabe  Model  WX4671 $1200.00 

*  VIEW-PLOT  I  Graphics  Software  packages:  Runs 
on  the  PET  connected  to  the  Watanabe  MIPLOT 
Plotter  via  the  IEEE-488  Bus  Interface  Adaptor, 
C102  Graphics  Package  (No  computer  skills 

needed  to  use)    $65.00 

Subroutines  Package  (16  Subroutines)  .$95.00 

Combination  of  Both  Packages    $145.00 

*PET  Computer  Desk,  designed  for  PET  computer, 
disk  and  printer    $395.00 

*ALL  COMMODORE  COMPUTERS, 
PERIPHERALS  AND  SOFTWARE 

We  will  shortly  announce  the 
following  new  products: 

•C301  PET  to  DIABLO  Printer  Interface 

•C302  PET  to  QUME  Printer  Interface 

•C231  Full  IEEE-488  Bus  to  RS232C  Uni-directional 

Interface 

•C232  Full  IEEE-488  Bus  to  RS232C  Bi-directional 

Interface 

ECX  Co.  offers  technical  support  and  fast  in  house  maintenance  and  service 
for  all  the  products  we  sell.  We  know  how  lo  repair  Commodore  equipment! 
EXC  Co,  is  owned  and  operated  by  COM-PLiCATIONS.  INC.  a  design  and 
development  corporation.  Call  us:  we  talk  technical!  ALL  COM-PLICA- 
TIONS INC.  products  are  manufactured  to  industrial  quality  standards.  If  you 
need  to  know  more  about  the  IEEE-4S8  Bus  read  our  jusl-published 
Osborne/McGraw  Hill  new  book.  "The  PET  and  The  IEEE-488  (GPIB) 
Bus",  authored  by  the  president  of  COMPLICATIONS.  INC.:  available  from 
ECX  Co.  for  S18.no  (includes  tax  and  shippiny). 

P.S.  All  of  our  IEEE  488  Bus  interfaces  meet  ALL  of  the  IEEE-488  Bus  perfor- 
mance requirements! 

ECX  Co. 

1372  N.  Main  Street  #6 

Walnut  Creek,  CA  94596 

(415)  944-9277 

Northern  California's  Fastest-Growing 
Exclusive  Commodore  Computer  Dealer 


*  Expand  witli  tlie  best 

FOR  GRAPHICS ...  It's  MIPLOT, 

the  InteUigent  plotter 


MiPLCfT  by  Watanabe  Coiporallon 


Designed  for  straight  forwajd  interface  to 
any  microcomputer  that  outputs  the  ASCII 
codfl,  MIPLOT  can  even  be  used  by  operators 
with  no  plotter  experlence. 

•  Incorporates  pre-programmed  "Intelligent" 
functions  required  for  producing  graphs  and 
drawings 

•  Solid  and  broken  line  types  can  be  specified 

•  BullL  m  character  generator  for  letters,  numbers 
and  ^nbols 

•  Characters  can  he  enlarged  and  rotated  to  four 
orlentailone 

•  Special  printer  mocie  outputs  character  data  as- la 

•  Uses  commonly  available  hard  fltter-tlp  pens 

•  Maximum  plot  speed  approximately  2  Inches  per 
second 

•  Bulli  m  self-test  mode 

Only  $1,200 

at  ESjFBtemB  Fonntjlate  Corporation 


FOR  CHAIIA.CTER  GENERATION... It's  the  new 

HAL  PCG  6500 

Prograimnable  Cliaracter  GeneratxDr 

At  last,  available  exclusively  at  ^tems 


Formulate  Corporation  Is  the  KAl  PCG  6500, 
a  programmable  character  generator  for 
your  PET.  With  the  PCG  6500,  you  can 
program  64  of  your  own  characters  Into  the 
system.  Other  features: 


Only  $200 

at  EtyBtems  Formulate  Corporation 


Built,  in  CBS  style  sound  amplifier 
Interface  to  PKT/CBM  with  34  pin  ROMS 
User  progT'am  not  required  for  dLsplaylng 
charai;ter.4  (only  for  programming  ttiem  > 
I'Mlly  mdeiiendent  of  user  memory 
All  software  needed  to  v/rlte  programs  using 
programmed  characters  Included 


FOR  MORE  MEMORY... 

Whether  for  Apple,  TRS-80,  PET  or  Sorcere, 
you'll  lllte  the  reliability  and  price  on  this 
16K  Dynamic  RAM  Ceramic  Package  by 
FuJltsa 

Only  $80 

at  Siyatemfl  Formulate  Corporation 

*For  more  Information  or  txD  order  ty  phone:  (416)  326-9100 

Whatever  your  ByBtem  or  erystem  erpanalon  noodB,  give  Systams  Formulate  a  call.  We  will  tie  happy  to  Bond 

along  mora  Information  to  you  or  tais  your  phone  order.  We  tionor  Master  Charge.  Visa  or  will  ship  COD. 

Store  Hours:  Monday-Saturday,  10-7,  Bundfly  12-6 


i\L)  SYSTEMS  FORMULATG  CORPORATION 


39  Ituwii  ef  Countiy  VUlage  •  Palo  Alto,  California  94301 
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How  to  Program 

in   DQSIC       Elizabeth  Deal 
m>fU|_  AL  _      337  W  First  Ave 

witn  ine    '^°'^793^5t 
Subroutine 
Power  of 
FORTRAN 

Fortran  and  PL/I  programmers  may  take  sub- 
routines out  of  the  library  and  append  them  easily  to 
any  main  program.  Those  of  us  programming  in  Basic 
have  to  be  very  careful  when  we  append  previously 
written  subroutines,  since  the  variable  names  have  to 
be  identical,  rather  than  passed  through  a  COMMON 
storage  area  or  a  parameter  list  (as  in  Fortran). 
This  article  describes  a  way  to  simulate  a  COMMON 
storage  area  when  programming  in  Basic.  It  is 
written  for  a  new  PET,  but  can  be  modified  for 
an  old  PET  or  adapted  for  other  microcomputers, 
such  as  Apple  or  Ohio  Scientific.  It  requires  some 
extra  code  which  occupies  about  2500  bytes,  but  it 
is  fast  and  can  handle  all  PET-supported  n-dimen- 
siona!  arrays  of  strings  and  arithmetic  values. 

Subroutines  in  Basic  are  internal  procedures  in 
that  variables  active  in  the  main  program  interact 
with  those  in  the  subroutine.  In  order  to  pass  para- 
meters to  and  from  a  subroutine  that  has  previously 
been  written  for  another  application  we  must  either 
rewrite  the  subroutine  or  assign  all  names  from  the 
calling  program  to  names  used  by  the  subroutine. 
For  single  variables  it  is  a  nuisance,  but  easy  to  do. 
It  is  more  complicated  for  arrays.  Several  options  are 
available:  (1)  rewrite  the  subroutine  or  the  main 
program,  (2)  move  one  element  of  the  array  at  a  time, 
(3)  move  the  entire  array  at  one  time  if  the  sub- 
routine requires  presence  of  the  whole  array.  We'll 
avoid  these  unwieldy  options. 

To  illustrate  the  problem,  imagine  that  you  have 
written  a  subroutine  to  find  minimum  and  maximum 
values  of  a  1000  element  array  S,  but  the  main 
program  uses  array  M.  Perhaps  your  subroutine  uses 
S  so  many  times  that  you  dread  the  idea  of  re- 
writing it,  or  the  main  program  calls  the  subroutine 
for  many  different  variables.  To  use  the  ap[>ended 
subroutine,  the  main  program  will  assign  dimension 
of  1000  elements  to  arrays  M  and  S.  It  will  then 
move  all  elements  of  M  array  into  S  array  and  then 
use  the  subroutine.  The  trouble  with  this  procedure 
is  that  two  thousand  elements  are  used  where  only 
one  thousand  arc  needed  and  it  takes  eight  seconds 


to  move  the  array  one  way  while  Basic  interprets 
the  instructions  into  machine  code  one  thousand 
times.  Were  we  to  pass  one  value  at  a  time,  the 
memory  area  would  be  saved,  but  the  program  still 
would  have  to  spend  eight  seconds  moving  the  array 
element  into  a  single  variable. 

My  solution  to  this  memory  and  time  wasting 
lies  in  moving  only  the  name  of  I  he  array  instead 
of  the  array  elements.  The  array  stays  put.  It  is 
never  moved,  but  its  name  is  changed  back  and  forth 
in  about  half  a  second. 

The  procedure  to  use  for  the  entire  project  is  to 
write  the  main  program,  append  whatever  subroutines 
one  needs  (via  Toolkit  or  any  merge  or  append  pro- 
gram), initialize  single  variables,  append  the 
routine  presented  here  (from  line  2520  to  3680), 
and  insert  the  linking  information  between  two  dotted 
lines  in  the  main  program. 

More  than  one  variable  can  share  a  name  with 
the  name  used  in  the  subroutine  (see  array  MK% 
and  M%).  The  number  of  such  variables  used  in  one 
program  is  limited  only  by  what  can  fit  in  255  bytes 
of  string  Q,S$.  String  QS$  together  with  the  DIM 
statement  is  the  key  to  the  program.  It  is  a  directory 
of  array  names  in  the  order  in  which  they  appear  in 
the  DIM  statement.  For  instance: 

Position    in    the    QS$    string:        12    3    4    5    6    7 

QS$  string  contains:  M%  ,  MK7o,  M,  MQ$,  SI7o 

S,  SQ$ 

DIM  statement  contains:  M%,  MK%,  M,  MQ$. 

*  *   * 

In  this  example  names  that  begin  with  "S"  refer  to 
arrays  used  in  the  subroutine.  The  asterisk  is  used 
to  emphasize  that  they  must  not  appear  in  the 
DIM  statement.  They  should  also  not  be  dimensioned 
in  your  subroutine.  Actually,  it  is  delightful  to  get 
a  REDIMENSIONED  ARRAY  ERROR  here,  since 
it  is  the  proof  that  the  name  change  works. 

PET  provides  us  with  all  the  information  we  need 
to  be  able  to  change  names.  Pointer  to  start  of 
arrays  is  stored  in  locations  44  and  45  (125  and 
127  in  old  PET).  Pointer  to  the  end  of  arrays  is  in 
location  46  and  47  (128  and  129  for  old  PET).  Array 
names  are  stored  in  the  first  two  bytes  preceding 
each  array,  and  the  memory  size  required  by  that 
array  is  in  bytes  three  and  four.  In  the  initializing 
routine  several  Q-arrays  are  declared.  The  end  of 
those  arrays  becomes  the  pointer  to  the  beginning  of 
the  arrays  that  we  are  concerned  with  -  those  in 
the  DIM  statement  between  two  dotted  lines.  The 
program  (lines  2720  to  2840)  reads  a  narne  of  an 
array  and  stores  each  character,  separately,  and  the 
address,  in  a  table.  The  pointer  is  then  moved  to  the 
next  array  by  the  number  of  bytes  the  first  array 
used.  When  the  names  and  addresses  of  arrays  in 
common  have  been  processed,  the  program  then 
modifies  the  names  in  the  QS$  string  (lines  2960 


2i 


COMPUTE. 


July/August,  1<?80  Issue  5 


to  3100)  SO  that  each  byte  will  correspond  to  the 
internal  format  of  the  PET  name  storage.  The  two 
lists  are  then  compared  {tines  3100  to  3200)  byte  by 
byte  and  if  they  match,  the  program  continues.  If 
there  is  any  discrepancy  it  is  indicated  in  the  error 
message  and  the  job  is  abandoned.  (If  during  the 
execution  the  arrays  arc  moved,  the  job  will  also  be 
abandoned  and  the  program  will  count  the  byte 
shift.  However,  if  it  happens  in  a  spot  undetectable 
by  my  routines,  the  standard  PET  error  messages 
will  result.) 

In  order  to  tell  the  lliul  +set  subroutines  which 
names  to  change  we  use  position  numbers  in  the 
Q^S$  string.  Thus  to  replace  name  M  with  S  we  will 
set  variable  QM  =  3  which  corresponds  to  the  third 
name  in  the  QSS  list,  and  variable  QS  =6  which 
corresponds  to  the  sixth  name  in  the  QS$  list.  The 
find  +  set  routine  will  put  a  name  referred  to  by  the 
QS  variable  into  the  naine  referred  to  by  the  QM 
variable,  or  S  over  M.  Now  the  work  subroutine 
uses  S,  and  on  return,  the  original  name  is  reset 
so  that  the  calling  program  can  continue  whatever 
it  is  to  do  with  array  M. 

The  output  of  the  demonstration  program  con- 
sists of  showing  what  happens  to  the  variables  at 
any  given  time.  It  occupies  about  a  screenful.  Two 
trivial  subroutines  are  used.  #1  adds  one  to  integers, 
finds  MIN  and  MAX  of  a  iloating  point  array  and 
adds  two  characters  to  the  elements  of  string  array. 
#2  creates  an  array  in  the  subroutine  and  passes 
those  values  to  the  main  program,  showing  that  the 
process  works  in  both  directions  and  that  it  does  not 
matter  where  the  array  is  created. 

To  make  it  easier  to  understand  the  listing  I 
have  named  all  variables  that  are  related  to  or  used 
in  the  initialize,  find  +  set  and  reset  routines 
with  a  letter  "Q_"  in  the  first  position.  Non-Q 
variables  are  general  variables  used  in  the  main 
program  and  mathematical  routines. 

There  arc  several  important  restriction.s  that  must 
be  observed.  Most  "BAD  SUBSCRIPT  ERROR", 
"ILLEGAL  QUANTITY  ERROR"  messages  occur- 
ing  during  the  find  +  set  routine  and  most  of  the 
erroneous  data  subsequent  to  return  from  reset 
routine  will  be  due  to  failure  to  comply  with  these 
rules: 

1.  All  single  variables  and  functions  (from  the 
main  program  and  subroutines)  must  be  assigned 
a  value  prior  to  the  DIM  statement  in  the  main 
program  and  prior  to  using  undimensioned,  small 
arrays.  This  is  a  good  rule  to  follow  anyway. 
Commodore  advises  that  arrays  are  actually 
moved  seven  bytes  each  time  a  new  single  variable 
is  defined  in  a  program.  Our  program  depends 
on  arrays  staying  in  one  place  throughout  the 
entire  program  and  subroutines.  1  ha\-e  not  yet 
found  a  simple  way  to  have  a  really  indepen- 
dent COMMON  area. 


2.  Provide  a  string  (QSS)  of  one  or  two  character 
array  names  that  will  be  used  in  connnon.  The 
array  name  used  in  a  calling  program  must  pre- 
cede the  corresponding  names  in  the  subroutine. 
In  the  demonstration  program  M%  and  MK% 
precede  the  listing  of  SI%,  but  M%  and  MK7o 
need  not  be  adjacent  to  Sl%  or  cacii  other  in  the 
QS$  string. 

3.  Arrays  from  the  main  program  that  will  be 
subject  to  name  change  must  be  dimensioned 
first.  They  must  be  contiguous.  They  must  be 
in  the  same  order  in  which  they  wei^e  listed  in 
the  QS$  string.  The  type  of  arrays  that  are 
common  between  the  calling  program  and  the 
subroutine  must  agree  (i.e.,  integer  with 
integer),  the  number  of  dimensions  must  agree, 
and  their  size  must  agree  only  to  the  extent 
requiied  by  the  logic  of  the  program.  (If 

array  M  was  dimensioned  to  twenty  elements,  but 
the  subroutine  tried  to  use  an  array  S  of  fifty, 
you'd  end  up  with  a  subscriyjt  error  or  garbage; 
if  the  array  was  dimensioned  to  fifty,  and  the  work 
subroutine  used  twenty,  there  is  no  problem). 

4.  Just  before  going  into  the  find  +  set  sub- 
routine, tell  the  program  by  use  ol'QM  and  QS 
variables  vvhich  names  will  be  changed.  QM  must 
be  smaller  than  QS. 

The  initialize,  find  +set  and  reset  routines 
take  up  about  2500  bytes  at  execution  time.  That 
is  equivalent  to  two  250  element  arrays  of  floating 
point  numbers.  From  the  memory  point  of  view  it 
makes  sense  to  tise  these  i"ouiines  only  when  the 
array  size  exceeds  that  amount.  From  ilic  (tnic  point 
of  view  it  makes  sense  to  use  them  when  the  array 
size  exceeds  fiity  elements.  It  takes  half  a  second  to 
change  and  reset  the  name,  but  it  takes  two  seconds 
to  move  the  array  one  way  and  two  seconds  to  move 
it  back.  From  the  editing  point  of  view  it  is,  for  me, 
easier  to  use  this  procedure  than  fool  around  with 
names.  The  hassle  of  defining  single  varial)les  is  made 
easier  by  PAICS  Programmer's  Toolkit  DUMP 
command. 

Note  on  terms  used  in  this  article: 
Fortran  programmers  should  note  that  this  system 
simulates  COiVIMON  in  its  ability  to  pass  the 
arrays  in  Basic,  but  that  it  is  based  on  the  concept 
of  EQUIVALENCE,  and  can  be  used  as  such.  PL/I 
programmers  will  see  that  it  is  similar  to  the 
DEFINED  (and  not  BASED)  attribute  of  variables, 
and  that  the  allocation  is  still  STATIC. 


1000  REM===========-================== 

1020  REM  SIMULATION  OF  COMMON  IN  BASIC 

1040  REM  BY 

1060  REM        ELIZABETH  DEAL 

10  80  REM  337  W. FIRST  AVE,  MALVERN,  PA 

1100  REM     19355;  (215)647-4876 
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1140 
1160 
1180 
1200 
1220 
1240 
1260 
1280 
1300 
1320 


1340 

1360 
1380 
1400 
1420 
1440 
1460 
1480 
1500 
1520 
1540 
1560 
1580 
1600 
1620 
1640 
1660 
1680 
1700 
1720 
1740 
1760 
1780 
1800 
1820 


1840 
1860 
1880 
1900 
1920 
1940 
1960 
1980 


2000 

2020 
2040 

2060 

2080 
2100 


2120 
2140 
2160 

2180 

2200 
2220 


REM 

REM 

REM 

REM 

REM 

REM 

REM  = 

REM 

REM- 

IN=2 

-,KX: 
MN=0 

-.S3: 
REM 
REM. 


REF 
1) 
2) 
4) 


GENE  BEALS  OP  AB  COMPUTERS 
PET  USER  NOTES  3)  COMPUTE 
LEN  LINDSAY  :OLD  PET/NEW 
PET  IN  MICROCOMPUTING 
COMMODORE  MANUAL 


— DEFINE  NON-Q  SINGLE-V,FN 

0:FL=15:LI$="":FORI=1TO3  9: 
$=LI$+"-" :NEXTI : JI=0 : JF=0 :Q=0 : 
=0 

:HX=0:I=0:J=0:K=0:S1=2:S2=2: 
=2:Z=64:L=0 :M=0 :N=0 :TX=0 


REM  LINK  MAIN  WITH  Q  SUBROUTINES 
REM  DEFINE  QS$ , INITIALIZE  IN  THE 
REM  SUB,  DIM  ARRAYS  IN  COMMON, 
REM  BACK  TO  INIT. ,  THEN  MAIN 

QS  S= "M% , MKI , M , MQ $ , S I % , S , SQ$ " 

GOSUB2520 

DIM  M% (IN) ,MK% (IN) ,M(FL) 

DIM  MQ${S1,S2,S3) 

GOSUB2720 

REM 

REM 

REM    BACK  TO  MAIN  PROGRAM 

REM 

REM DIM  ALL  OTHER  ARRAYS 

REM  (NONE  HERE) 

REM ASS IGN  VALUES 

F0RJ=1T0IN:MK% (J)=J:NEXT 
F0RJ=1T0FL : M ( J) =-j/100 : NEXT 
F0RI=1T0S1 :F0RJ=1T0S2:F0RK=1T0S3 ; 

-iMQ5  ( I ,  J  ,  K)  =CHR$  { I+Z)  +CHR$  ( J  +  Z)  +CHR 

-.$(K+Z) 
NEXTK,J,I 

REM ASSIGN  QS,QM  FOR  NAME 

REM    CHANGE;  POKE  NEW  NAME;  USE 
REM    IN  SUBROUTINES;  RESET  NAME, 
REM    CONTINUE. 
REM 

PRINTLI$:  REM  DEMO  FEW  ARRAYS 

QS=7 :QM=4 :GOSUB3300:QS=6 :QM=3 : 

-.GOSUB3300  :QS=5:QM=2:GOSUB33  00: 

^REM  FIND+SET 
JI=IN: JF=FL:I=S1:J=S2:K=S3: 

-.GOSUB2260:PRINT"SUB#1,  "; 

GOSUB3460:REM  RESET  ALL  NAMES 

PRINT: PRINT" (MK%) "; :F0RJ=1T0IN: 

^PRINTMK% (J) ; : NEXT: PRINT 
PRINT -PRINT" (M   ) "; :F0RJ=1T0FL: 

-.PRINTM(J)  ;  :  NEXT;  PRINT 
PRINTTAB(10) "MIN="MN",  MAX="MX 
PRINTrPRINT" (MQ$} "; :F0RI=lT0Sl : 

^F0RJ=1T0S2 : F0RK=lTOS3 : PRINTMQ$ ( I , 

-J,K) ; 
NEXTK,J,I:PRINT:PRINTLI? 

REM  DEMO  ONE  ARRAY 

QS=5:QM=1:GOSUB3300:KX=IN:GOSUB2380 

-.:PRINT"SUB#2,  ";:GOSUB3460 
PRINT:PRINT" (M%) "; :F0RJ=1T0IN: 

-.PRINTM%  { J)  ;  :NEXT:PRINT:PRINTLI$ 
END:   REM  END  MAIN 
REM 


2240  REM===WORK  SUB#1================= 

2260  : :F0RQ=1T0JI:SI% ( Q) =SI% (Q) +1 : 

NEXTQ 
2280  F0RL=1T0I:F0RM=1T0J:F0RN=1T0K: 

-SQ$(L,M,N)="*"+SQ$(L,M,N)+"/": 

-.NEXTN,M,L 
2300  MX=-l,7E38:MN=1.7E38:FORJ=lTOJF: 

-iIFS(J)  <  =  MNTHENMN  =  S(J) 
2320  IFS(J) >=MXTHENMX=S(J) 
23  40  NEXTJ: RETURN 
2360  REM===WORK  SUB#2================= 

2380  : :F0RK=1T0KX:SI% (K) =K: NEXT: RETURN 

2400  REM 

2420  REM== *==*  =  =  *==*=  =  *==*==*==  *==*==* 

244  0  REM 

2460  REM===SUB:  INITIALIZE============ 

2480  REM 

2500  REM DCL  Q'S:  SINGLE , FN, ARR 

2520  : : PRINT" INIT1":DEFFNQA(QP)=PEEK(QP) 

-.+256*PEEK(QP+1) 
2540  QB=0:QC=0:QD=0:QE=0:QF=0:QH=0:QI=0: 

nQJ=0 :QK=0 :QL=0 :QH=0 :QN=0 
2560  QP=0:QQ=0:QR=0:QS=0:QT=0:QU=0:QW=0: 

^QX=0:QY=0:QZ=0:Q=0 
2580  QK$="":QMS="":QL=LEN(QS$)/2 
2600  IFPEEK(5  0003)=1THENQ5=4  4:Q6=46: 

-iQ7  =  54  :Q8  =  152:GOTO2640 
2620  Q5=126:Q6=128:Q7=136:Q8=516 
2640  : :DIMQG(QL) ,Q1(QL) ,Q2(QL) ,QD$(QL) , 

-Q3(QL) ,Q4(QL),QN$(QL) :F0RQ=1T0QL 
2660  QD?(QL)="":QN$(QL)="":NEXT 
2680  QZ=FNQA(Q5) :QI=FNQA(Q6) :PRINT"MAIN" 

-.:  RETURN 

2700  REM ARRAYS  FROM  DIM 

2720  : :PRINT"INIT2":QD=FNQA(Q7) : 

-tGOSUB3640:QH=QI:QE=FNQA(Q6) 
2740  : :QK=QK+1:QG(QK)=QH:QC=QG(QK) : 

-■Ql  (QK)=PEEK(QC)  :Q2  (QK)  =PEEK  (QC+1 ) 
2760  QX=Q1(QK) :QY=Q2(QK) 
2780  QT=0 :QT=QT+37* (- (QX>=128ANDQY>=128) 

-.)+3  6*  (-{QX<128ANDQY>=128)  ) 
2800  QX=QX-128*(-{QX>128) ) :QY=QY+128* (- { 

-.QY=0)  )-128*{-(QY>128)  ) 
2820  QD$(QK)=CHR$(QX)+CHR$(QY)+CHR$(QT) : 

-.REM  DO  NOT  COMPARE  QD$  TO  QN$  !  ! 
2840  QN=FNQA(QC+2) : QH=QH+QN: IFQH<QEG0T02 

^740 

2  860  REM ARRAYS  FROM  QS$ 

2880  QU=1:F0RQ=1T0LEN(QS$) :QK$=MID$ (QS$ , 

-.Q,l)  :IFQK$=",  "THENQU=QU+1  :NEXTQ 
2900  QN$(QU)=QN$(QU)+QK$:NEXTQ 
2920  IFQU<2THENPRINT"***C0RRECT  QS$":END 

2940  REM FIX  NAT'lES  IN  QS? 

2960  F0RQ=1T0QU:QM$=QN$(Q) :QF=0:QJ=0: 

-iQT=ASC  (  RIGHTS  CQM$,1)  ) 
2980  QT=QT*(-{QT=360RQT=37) ) :QF=12  8*(-(Q 

-.T=37)  )  :QJ=128*(-{QT=370RQT=36)) 
3000  IFLEN(QM$) >2GOTO3060 
3020  IFQJ=0ANDQT=0THENQHS=QM$+CHR$(0)  : 

-.GOTO3060 
3040  QM$=LEFT$(QM$,1)+CHR$(128)+CHR$(QT) 
3060  : :QX=QF+ASC(LEFT$ (QMS,1) ) :QY-QJ+ASC 

-.(MID$(QM$,2,1)  )  :QY=QY-QJ*(-(QY>255 

-)) 
3080  Q3(Q)=QX:Q4(Q)=QY:REM  PRINTQ; TAB ( 4 } 

-.QM$;TAB(10)QX;QY 
3100  NEXTQ:QQ=0 :F0RQ=1T0QK: IFQl (Q) =Q3 (Q) 

-,ANDQ2  (Q)  =Q4  (Q)GOTO3140 
3120  QQ=QQ+1:QN$(Q)=QN$(Q)+"   < —  ??" 
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3140 
3160 


3180 

3200 


3220 
3240 
3260 
3280 
3300 
3320 

3340 

3360 

3380 
3400 
3420 
3440 
3460 

3480 

3500 
3520 

3540 
3560 
3580 
3600 
3620 
3640 
3660 

3680 
3700 


: :NEXTQ:IFQQ=0GOTO3200 
PRINT:PRINT"***NO  MATCH  !":PRINT: 

->PRINT"QS/QM   QS$"TAB(20)  "DIM": 

-.PRINT 
F0RQ=1T0QU : PRIKTTAB ( 1 ) QTAB ( 7 ) QN$ (Q) 

-,TAB  (  2  0 )  QD§  ( Q )  :  NEXTQ :  END 
PRINT"MAIN.  ":PRINT"PRESS  'SHIFT'  -. 

-.TO  CONT  MAIN  PRGM"  :  WAITQ8  , 1 : 

-.PRINT"  OK" 
RETURN 
REM 
REM===SUB:  FIND+SET  NAME========= 

REM 

: :QD=FNQA(Q7) :GOSUB3640 

IFQS<=QMTHENPRINT"***BAD  POSITION  -. 

-.NUMBERS  ":PRINT"QS="QS",  QM="QM:END 
QR=QG(QM) :PRINT"SET  "QN$ (QS) TAB (8 ) " 

-.OVER  "QN$(QM)  ;  :  PRINTTAB  ( 1  8  )  "AT"QR 
QB=QB+1:QG{QM)=-QG(QM) :POKEQR, 

-.Q3(QS)  :P0KEQR+1,Q4(QS) 
RETURN 
REM 
REM===SUB:  RESET  NAME============ 

REM 

:  :IFQB<1THENPRINT"***IMPR0PER  CALL  -. 

-.TO  RESET":  END 
QD=FNQA(Q7)  :GOSUB3640  :PRINT"RESET  -. 

-.NAME  AT"; 
FORQ=1TOQK:IFQG(Q)>0GOTQ3540 
QG(Q)=-QG(Q) :QR=QG{Q} : P0KBQR,Q1 (Q) : 

-iP0KEQR+l,Q2(Q)  :PRINTQR; 
: : NEXTQ: PRINT: RETURN 
REM 

REM CHECK  COMMON  ARRAYS  POS 

REM    CALLED  BY  INIT, SET, RESET 

REM 

: :QW=FNQA{Q5) : IFQW=QZTHENRETURN 

PRINT:  PRINT"***ARRAYS  MOVED"QW-QZ" 

-iBYTES" 
PRINT"    PRIOR  TO  LINE"QD:END 
REM==============================  © 
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Computerists 

The  January- December  1979  PERIODICAL  GUIDE 
FOR  COMPUTERISTS  indexes  over  2000  articles 
from  20  personal  computing  and  professional  electronic 
publications.  Articles,  editorials,  book  reviews  and 
letters  from  readers  which  have  relevance  to  the 
Personal  Computing  field  are  indexed  by  subject 
under  110  categories.  A  list  of  the  authors  is  cross- 
referenced  by  subject  to  aid  in  locating  articles.  The 
80  page  book  is  available  for  $5.95  from  E.  Berg 
Publications,  622  East  Third,  Kimball,  NE  69145 
or  from  local  computer  stores.  A  free  brochure  which 
describes  the  book  in  more  detail  is  available  on 
request.  Editions  covering  1976,  1977,  and  1978  are 
available  for  $5.00  each.  Q 
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FOUR  PART  HARMONY    FOR  THE  PET 

A-B  Ccmpiiters  announces  a  cotnbinalion  system  consisting  ol  llie 
KL  -IM  DAC  Board  and  Ihe  Visible  Miisic  Monilor  lor  Commottore  PET- 
CBM  computers  The  pnckage  enatiies  PET  users  lo  easily  create  and 
play  musical  compositions  of  up  lo  4  parts 

The  KL-4M  Board  includes  an  8-bJl  Digital  to  Analog  Converter,  a  low 
pass  liller  to  eliminate  high  frequency  computer  gerveraled  hiss,  and  an 
on-board  audio  anipliliei  An  RCA-lype  lack  is  also  included  for  quick 
altactimenl  o!  your  speaker  Amplilication  of  Ihe  6522  CB2  generaled 
single  note  sound  is  incorporalett  as  well,  so  that  no  addilional  tiardware 
(other  than  a  speaker)  is  required  Connection  is  made  via  the  parallel 
and  cassette  ports  Bolh  ports  ate  extended  with  duplicate  connectors 
(with  keyv/ays)  so  i/O  capabilities  are  not  reduced  in  any  way  Board 
orientation  is  parallel  lo  the  back  ol  the  PET  so  additional  table  space  is 
not  required  The  KL-'IM  is  compatible  with  any  of  the  4  part  music 
monitors,  for  which  a  number  of  piecoded  songs  are  available 

The  Visible  Music  Monitor  is  intended  to  support  4-parl  harmony 
systems  such  as  Ihe  KL-4M  Visible  Music  Monitor  is  written  entirely  in 
6502  machine  language  VMM  provides  an  easy  way  to  enler  4-parl 
music  The  user  can  see  Ihe  notes  on  the  screen  as  they  are  entered,  and 
can  make  changes  tx)th  with  the  insert  and  delete  keys,  and  by  using 
cursor  up  and  down  lo  'move"  notes  on  Ihe  screen  Other  features 
include  "record  changer"  mode  to  load  successive  songs  without 
intervention,  user  deli  liable  keyboard,  and  entry  ol  v;hole  noles  Ihrough 
64lhsincludingdolled  and  liiplcl  notes  Additionally,  you  can  speedy  or 
change  lempo,  sel  key  signature,  and  transpose  at  any  liine  Wave  form 
modification  makes  it  possible  lo  create  new  instrument  sounds  Voices 
can  switch  from  one  instrument  toanotherorgangupononeinsi  lument 
during  the  course  of  the  song.  Music  can  be  played  either  with  note 
display  (useful  lor  debugging  songs),  or  with  no  display 

KL-4fvl  Music  Board  &  Visible  Ivlusic  Monitor  Program  S59.9Q 


PAPER-MATE 
60  COMMAND 

WORD 
PROCESSOR 


Paper-Male  is  a  full-lealured  word  processor 
lor  S29  00  by  Michael  Riley  Paper-Mate  incor- 
porates 60  commands  lo  give  you  Hill  screen 
editing  v^ilh  graphics  (or  all  16k  or  32K  PETs,  all 
printers,  and  disk  or  tape  drives.  It  also  includes 
most  features  of  the  CBM  WordPro  III.  plus  many 
additional  features 

For  wriling  text.  Paper- Mate  has  a  definable 
keyboard  so  you  can  use  either  Business  or 
Graphics  machines  Shift  lock  on  letters  only,  or 
use  keyboard  shift  lock  All  keys  repeal 

Paper-Mate  text  editing  includes  floating  cur= 
sor.  scroll  up  or  down,  page  forward  or  back,  and 
repealing  insert  and  delete  keys  Text  Block 
handling  includes  transfer,  delete,  append,  save, 
load,  and  insert 

All  formatting  commands  are  imbedded  in  text 
for  complete  control  Commands  include  margin 
control  and  release,  column  ad|ust.  9  lab  settings, 
vanable  line  spacing,  justify  text,  cenler  text,  and 
aulo  print  form  letter  (variable  block)  Files  can  be 
linked  so  that  one  command  prints  an  entire 
manuscripi  Auto  page,  page  tieaders.  page 
numfjers,  pause  at  end  of  page,  and  hyphenation 
pauses  are  included 

Unlike  most  word  processors,  PET  graphics  as 
well  as  text  can  be  used  Paper-Mate  can  send 
any  ASCI  1  code  over  any  secondary  address  to 
any  printer 

Paper-Male  works  on  16K  or  32K  PETs  wilfi 
any  ROM.  cassette  or  disk,  and  CBM  or  non- 
CBM  printers.  An  8K  version  is  in  the  planning 

To  order  Paper-Male,  specify  machine  and 
ROM  type 

On  Tape  (with  manual) S29.95 

On  Disk  (with  manual): 532.95 

Manual  Separate:     S  l.OD 


BET  YOU  CANT  BEAT  ITI 
MICROTHELLO 

by  Mike  Riley 

There  are  five  levels  ol  play  in  this  PET 
machine  language  program.  Level  four  is  lor 
experts  only  and  is  designed  for  lournament 
level  play.  So  far  no  one  has  been  able  to  beat 
level  four.  Level  five  lakes  several  minules  to 
move  and  is  used  for  exhaustive  analysis  ol 
specific  moves. 

TTiere  are  several  features  lo  help  in  ihe 
analysis  of  a  game  Any  position  on  itie  board 
can  be  recalled  and  replayed  Bolh  ihe  level  of 
difficulty  and  the  position  ol  the  pieces  can  be 
changed  a  I  a  ny  ti  me  Vou  can  play  agai  nsl  the 
machine,  against  another  person,  or  watch 
the  machine  play  itself  You  and  the  machine 
can  switch  sides  during  the  game,  l^oves  are 
selected  wilh  the  cursor  rather  than  by 
coordinates.  For  all  PETS  S9.95 


TUNNEL  VISION  & 
KAT  AND  MOUSE 

NOW  IN  MACHINE  LANGUAGE 

By  Riley  and  Levinson 

This  program  was  so  popular  thai  several 
other  versions  have  appeared  on  the  market. 
In  order  to  keep  ahead  of  the  competition,  the 
program  has  been  re-written  in  machine 
language  for  fast  graphics 

The  program  includes  two  excellent  maze 
games  In  Tunnel  Vision,  you  view  Ihe  maze 
from  inside  in  perspective  If  you  get  lost,  the 
program  provides  a  map  showing  your  trail.  In 
Kat  and  Mouse,  you  must  firxl  your  way 
through  the  maze  before  the  hungry  Kat  finds 
you.  Each  maze  has  only  one  solution,  and 
each  IS  unique  For  all  PETS  :  $7.95 
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6,00 
6  60 
415 
510 

17,00 
6.25 

12,70 

90 

265 

2  15 


CASSETTES— AGFA  PE-611  PREMIUM 

High  output,  low  noise.  5  screw  housing,  labels 

C-10  10/5.65  50/2500  100/4800 

C-20  10/6  45  50/29  50  100/5700 

C-30  10/7.30  50/34  00  100/66  00 

All  other  lengths  available  Write  lor  price  list 


DISKS 

(wnle  for  quantity  prices) 

SCOTCH  8"  Disks 
SCOTCH  5,25"  Disks 
Verbatim  5  25"  Disks 
Diskette  Storage  Pages 
Disk  Library  Cases 
BASF  5  25'  Disks 
BASF  8'  Disks 


8"  -  2.95 


10/S31  00 
10/  31  50 
10/  25  50 
10/  3  95 
5-  -215 
10/  28  00 
10/  29  00 


ATARI— INTRODUCTORY  SPECIAL 

Atari  400.  Atari  800.  all  Atari  Modules  20%  OFF 


Commodore  CBM- 
PET  SPECIALS 

-Up  loS235  free 
y^  merchandise 
^y     with  purchase  of  one 
<C  lollowmg  CBM-PET 

ilems 


8032  32K-80  column  CRT 
8016  15K-80  column  CRT 
8050  Dual  Disk  Drive-950.000  bytes 
CBIUl  Modem-IEEE  Interlace 
CBM  Voce  Synthesizer 
8N  full  size  graphics  keytjoard 
16N  lull  Size  graphics  keytward 
32N  lull  size  graphics  keyboard 
16B  full  size  business  keyboard 
32B  full  Size  business  keyboard 
2040  Dual  Disk  Drive-343.000  bytes 

2022  Tractor  Feed  Printer 

2023  Pressure  Feed  Printer 
C2fJ  External  Cassette  Deck 
Used  8K  PETs  (limited  Quantities) 


'*"•  EDUCATIONAL  DISCOUNTS  """ 

Buy  2  computers,  get  1  FREE 

CBM  Full  Size  Graphics  Keyboard  S  74 

CBM  WordPro  l-lor8K  PET  25 

CBM  WordPro  11-16  or  32K.  2040.  Printer  88 

CBM  WordPro  II1-32K,  2040.  Printer  1 78 

VISICALC  lor  PET  ICBM/Personal  Softwarel  $128 

CBM  Assembler/Editor  (disk)  89 

CBM  General  Ledger.  A/P  A/R  NEW!  270 


Programmers  Tooikit-PET  ROM  Utilities  S  44  90 

PET  Spacemaker  Switch  23  90 

Dusi  Cover  lor  PET  7  90 

lEEE-Paraltel  Prmle;  Inlertace  for  PET  7900 

fEEE-RS232  Printer  Interface  for  PET  14900 


Ctirtrstilcs  737  Prooortional  Spacing  Pnnlef  M45 

NEC  Spinwiiter-parallel  2450 


SYf^-1    S209           with  4K  RAM  $  238 

SYM  BAS-I  BASIC  in  ROM  85 

SYM  RAEI/2  Assembler  m  ROM  85 

MDT  1000  Synertek  Developmeni  System  1345 

KTI^I  2/80  Synertek  Video  Board  349 

KIM-1  (add  $34  for  power  supply)  159 

Seawell  Moiherboard-4K  RAM  195 

Seawell  16K  Sialic  RAM-KIM.  SYM.  AIM  320 

S  100  Static  RAM  kit  SALE  198 

Leedex  Video  1 00  1 2"  f^onilor  1 29 

Zenith  2)9  Terminal  (lactory  asm.)  770 

KL-4M  Four  Voice  Music  Board  for  PET  S34.90 

Visible  Music  Monitor  (4  Voice)  for  PET  29  90 

SPECIAL— KL-4M  with  Visible  Music  Monitor  59.90 

MICROTHELLO  for  PET  by  Michael  Riley  S9  95 

Machine  language  version— you  can't  wm  at  Level  5 

PAPER  MATE  60  CommaiK)  PET  Word  Processor       S29  95 
Full-featured  version  by  Michael  Riley 

All  Book  and  Software  Prices  are  Discounted 

S12  75 

1275 

9,45 

1015 

1045 

1045 

6.45 

7.75 

9.45 


115  E.  Slump  Road 
Montgomeryville,  PA  18936 


21 5-699-5826 


A  B  Computers 


PET  Personal  Computer  Guide  (Osborne) 
PET  and  Ifie  IEEE-488  Bus  (Osborne) 
6502  Assembly  Language  (Osborne) 
Hands  on  BASIC  with  a  PET 
Programming  Ihe  6502  (Zaks) 
6502  Applications  Book  (Zaks) 
6500  Manuals  (M05) 
Programming  a  Microcomputer  6502 
6502  Software  Bookbook  (Scefbil 


WRITE  FOR  CATALOG 

Add  S 1  per  order  tor  shipping.  We  pay  balance 
of  UPS  surlace  cfiarges  on  aff  prepaid  orders. 


Each 
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Computers 

CiriCI    I  ri  w  Susan  Semancik 

Handicapped 


The  Delmarva  Computer  Club 

P.O.  Box  36 

Wallops  Island,  VA  23337 

One  of  the  biggest  problems  facing  programmers  who 
have  neither  hardware  nor  electrical  expertise  is  finding 
"off-the-shelf"  ilems  that  will  interface  directly  to  their 
computer  allowing  input  alternatives  for  the  handi- 
capped. Programmers  can  devise  specialized  coding 
for  diflereni  applications  of  the  interface  device,  but 
first  they  need  a  device  with  which  to  work. 

The  Delmarva  Computer  Club  is  trying  to  develop 
quick,  inexpensive  and  versatile  interfaces  for  both  the 
blind  and  the  quadriplegics  in  our  area.  A  device 
we  are  exploring  that  is  readily  available  and  plugs 
into  the  PET's  U.ser  Port  is  INNOVISION's 
Prestodigitizer  board.  The  original  software  of  the 
board  trains  the  computer  to  recognize  the  user's 
stroke  set  for  either  digits  or  letters  of  the  alpha- 
bet. This  board  can  be  as  versatile  an  input  device  as 
the  programmer  needs  in  many  applications. 

For  those  not  familiar  with  the  board,  it  is  a 
small  tablet  partitioned  into  seven  copper  sections. 
As  can  be  seen  in  Figure  1 ,  the  largest  section  is  a 
vertical  strip  extending  the  length  of  the  right  edge 
of  the  tablet.  This  is  used  in  the  original  .software 
to  indicate  the  end  of  a  sequence  of  input  strokes  made 
on  the  other  six  horizontal  sections.  Each  section  is 
wired  to  one  of  the  PA  lines  of  the  User  Port.  A  metal- 
tipped  wand  is  used  to  touch  the  copper  sections, 
thereby  completing  the  electrical  circuit  indicating 
which  line  is  active.  In  the  original  software,  the 
sequence  of  sections  selected  in  defining  a  character 
is  packed  into  a  string  during  the  training  part  of  the 
program  and  compared  against  the  user's  inputs  dur- 
ing the  recognition  part.  The  software  is  writted  so 
that  each  stroke  is  not  inlluenced  by  the  length  of 
time  contact  is  made  by  the  wand.  The  original 
program  prevents  the  choice  of  the  same  section 
consecutively  without  an  intervening  choice.  This  is 
fine  for  defining  the  shape  of  digits  and  letters, 
but  for  other  purposes  it  can  be  programmed  differ- 
ently, as  Program  2  will  illustrate. 


Also,  originally  only  five  of  the  six  horizontal 
sections  were  wired  to  the  PA  pins  of  the  User  Post. 
This  is  acknowledged  in  the  Prestodigitizer's  Manual, 
but  no  reason  is  given  for  its  exclusion.  Those  of 
you  handy  enough  to  pry  the  glued  back  cover  off 
the  board,  drill  into  the  material  backing  the  un- 
attached region,  and  solder  a  connecting  wire  be- 
tween the  copper  of  the  region  and  PA  I,  can  easily 
remedy  this  situation.  Only  the  application  used  in 
Program  3  below  needs  this  hardware  change. 

The  Prestodigitzer  board  can  be  implemented 
in  a  computer  system  for  a  quadriplegic  by  having 
the  wand  held  in  the  user's  mouth  or  attached  to 
a  spring  on  a  frame  within  grasp  of  the  user's 
lips.  A  sample  program  to  show  how  the  different 
regions  can  be  used  as  inputs  without  any  modifica- 
tions to  the  board  or  software  is  Program  1,  whicii 
oroginally  appeared  in  the  PET  USER  NOTES, 
Volume  1,  Issue  7,  under  the  name  ARROW,  and 
was  written  by  Jim  Butterfield.  It  has  been  modified 
for  variable  snake  speed  and  Prestodigitizer  input. 

Since  the  input  selections  needed  in  the  program 
are  YES,  NO,  RIGHT,  LEFT,  UP,  and  DOWN, 
each  one  of  the  wired  regions  of  the  board  can  be 
uniquely  assigned  an  input  response.  Not  only  can 
the  program  cx[3liciily  describe  the  regions  corres- 
ponding to  each  word,  but  the  words  can  be  written 
on  pieces  of  index  cards  and  taped  on  the  board 
adjacent  to  the  appropriate  region.  Figure  2  shows  the 
arrangement  used  in  Program  1 .  Overlays  could  be 
designed  for  different  programs  recjuiring  no  more 
than  six  types  of  responses,  adding  to  the  versa- 
tility of (he  board. 

Figure  1 


^,^0^^6< 


Illustralioiis  courtesy 
C.  Marshall  Curtis 
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12  GOSUB13:GOTO20 

13  P=59471:POKE59459,0 

14  PRINT"fij:  ARROW  r  GAME" 

15  PRINT  :PRINT"SET  THE  TIMER  FOR  THE  -, 

-.SPEED  THE  SNAKE    HILL  MOVE  BY"; 

16  PRINT"  TOUCHING  THE  REGION  HARKED  " ; 

17  PRINT"jLRIGHTr  ON  THE  TABLET  WHEN  -, 

-.YOUR  NUMBER     CHOICE  APPEARS. i^" 

18  PRINT"THE  NUMBERS  WILL  CONTINUOUSLY  -. 

-.HOVE  FROM   0  (FASTEST)  TO  100(SLOWE 
-.ST)  ." 

19  GOSUB2000:RETURN 

20  PRINT  "filNSTRUCTIONS?    -    TOUCH    THE    -. 

-.REGIONS    HARKED  JLYESf ,    OR  jiNQf." 

21  LS=PEEK(P) :IFLS=255THEN21 

22  1FLS=247THEN100 

23  IFLS0254THEN21 

30  PRINT"fiGUIDE  THE  MOVING  'SNAKE'  WITH  -. 

-nTHE        REGIONS  MARKED:" 
35  PRIMTTAB(15)  "iJ^jiUPf  "  :  PRINT"iLEFTf  "TAB  ( 

-.28)  "iRIGHTf  " 
40  PRINTTAB(15) "rDOWNf ": PRINT: PRINT: 

-.PRINT 
50  PRINT"DON'T  HIT  THE  BOUNDARY  {OR  THE  -. 

-.SNAKE)  ,-" 
60  PRINT"  ..TRY  TO  HIT  THE  BOXES  FOR  -. 

-.POINTS." 
65  PRINT"tBUT  BEWARE!  THE  SNAKE  GROWS  -. 

->AS  IT  HITS   BOXES!  !"  :PRINT:PRINT 
70  PRINT"yOU  HAVE  60  SECONDS  OF  PLAY.  -. 

-.GOOD  LUCK!  ":  PRINT  rPRINT 
80  PRINT:PRINTTAB{2)  "TOUCH  THE  REGION  -. 

-.MARKED  rNOr  TO  START" 
90  LS=PEEK(P) :IFLS=255THEK90 
95  IFLSO247THEN90 
100  DIHP(80) ,D(3) 

110D{0)=22:D(1)=60:D(2)=62:D{3)=3  0 
120  T9=3  2768:T6=35  99:POKE59468,12 
130  Hl  =  5 9 4 6 7 : H2=5 94 6 6 : M3  =  5 94 6 4 
140  PRINT"?!   SCORE:  0" 
150  FORJ=3  2808TO32  847:POKEJ,81:POKEJ+920 

-.,81  :NEXTJ 
160  FORJ=32  84  8TO33728STEP40:POKEJ,81: 

-.POKEJ  +  39,81:NEXT 
170  V=20:H=3  5:V1=0:H1=-1:P2=10:D1=1 
180  TI$="000000" 
190  PRINT"]i";RIGHT$(TI$,2)  :  IFTI>T6THEN48 

-.0 
200  LS=PEEK(P) :IFLS=255ORLS=OLTKEN230 
205  OL=LS 

215  IFLS=239THENZ=0:GOTO220:REM  DOWN 

216  IFLS=251THENZ=1:GOTO220:REM  LEFT 

217  IFLS=223THENZ=2:GOTO220:REM  RIGHT 

218  IFLS=253THENZ=3:REH  UP 

220    D1=Z:D=Z-1.5:V1=INT{ABS (D) ) *SGN(D} : 

-.H1  =  SGN(D)-V1 
230    V=V-V1:H=H+K1 
240    SP=32768+V*40+H 
250    P9=PEEK(SP) : POKEHl , 16 : P0KEM3 , 

^29*D1+80:POKEM2,15 
260    R6=R7:R7=R7+1:IFR7>P2THENR7=0 
270    P1=P(R7) :P(R7)=SP:POKEH1,0:IFP1<>0TH 

-.ENP0KEP1,32 
280    P0KESP,D(D1)  :P1=P(R6)  :  IFP1O0THENPOK 

-nEPl,81 

285    F0RXY=1T0XTY:NEXTXY 
290    IFP9O32GOTO400 
300    IFRND(l) >.O5GOTO190 


310    FORV3=V2-1TOV2+1:P3=V3*40+T9: 

-.FORH3  =  H2-1TOH2  +  1:IFPEEK(P3+H3)  O10 

-.2GOTO330 
320    POKEP3+H3,32 
330    NEXTH3,V3:T=0:POKEP8,32 
340    V2=INT(RND(1) *20 ) +3 : H2=INT ( RND { 1 ) *36 

-)+2 
350    FORV3=V2-1TOV2+1:P3=V3*40+T9: 

-.F0RH3  =  H2-1T0H2  +  1 :  IFPEEK  (  P3+H3  )  <>32 

-.GOTO340 
360  NEXTH3,V3:FORV3=V2-1TOV2+1:P3=V3*40+ 

-iT9  :  F0RH3  =  H2-1T0H2+1 
370  POKEM1,16:POKEM2,15:POKEM3,30 
380  POKEP3+H3,102:POKEM1,0 
390  NEXTH3,V3:T=9*RND(1) : P8=V2*40+H2+T9 : 

-.POKEP8,49  +  T:GOTO190 
400  IFP9O102GOTO460 
410  T$=TI$ 
420  T=T-1:S=S+1 : P0KEP8 , T+49 : POKEMl ,  16  : 

-.POKEH2,15 
430  PRINT "ii>»»»»";S 
440  FORJ=100TO3  0STEP-1:POKEH3,J:NEXT: 

^POKEMl , 0 : IFT>=0GOTO420 
450  P2=P2+1:TIS=T$:GOTO310 
460  POKEHl, 16 :P0KEM2, 15 :P0KEM3, 200: 

-.FORJ  =  1TO1000:NEXT 
47  0  POKEHl, 0 

480  PRINT"ANOTHER  GAHE?  Y  OR  Nr"; 
490  LS=PEEK(P) :IFLS=255ORLS=OLTKEN490 

496  IFLS=247THENZ$="N" 

497  IFLS=254THENZ$="Y" 

500  IFZ$="Y"THENCLR:G0SUB13 :GOTO100 

510  IF2$<>"N"THEN490 

520  PRINT "i"; 

530  POKE594  67,0:POKE5  9466,0:POKE594  64, 

-.221:  END 
2000  FORI=0TO100STEP5 
2010  ZZ  =  33268:AA=LEN(RIGHT$(STR$(I)  , 

-.LEN(STR$(I)  )-l)  ) 
2020  FORJ=0TOAA:W=VAL{MIDS(STR$(I)  ,J+1, 

-.1)  )  :POKEZZ+J,W+176:NEXTJ 

2030  FORK=1TO50 

2031  LS=PEEK(P) :IFLS<>255THEN2050 
2040    NEXTK : NEXTI : FORJJ=0TO4 : POKEZ  Z+JJ, 

-.3  2  :  NEXTJ  J  :  G0T02  0  0  0 
2050    IFLSO223THEN2031 
2060    XTY=I:RETURN 


Figure  2 
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Another  possible  use  of  the  board  by  the  hanrh- 
( a|;)[)L"d  who  know  Morse  Code  is  lo  input  characters 
using  this  code.  Only  two  regions  are  needed  to 
signal  either  a  dot  or  dash  selection,  and  either  a 
time  delay  or  the  touching  of  the  vertical  section 
can  be  used  to  indicate  the  end  of  a  character. 

Program  2  is  an  example  of  how  to  input  the 
letters  of  the  alphabet  using  Morse  Code  on  the  Preslo- 
digilizer  board.  The  disassembled  listing  for  Program 
2  is  the  6502  assembly  language  part  of  the  program 
and  allows  repeat  selection  of  a  section,  using 
the  top  left  horizontal  region  for  a  dot,  the  top 
right  horizontal  region  for  a  dash,  and  the  vcrical 
region  for  the  end  of  a  character.  The  dots  and 
dashes  are  rotated  into  memory  location  981  as 
either  zeroes  or  ones,  with  memory  location  983 
containing  the  number  of  characters  entered. 

Each  alphabetic  character  has  two  entries  in 
the  defining  table  .starting  at  memory  location 
5000.  The  first  entry  has  the  number  of  dots  and 
dashes  in  the  character's  code,  and  the  second  entry 
has  the  bit  pattern  corresponding  to  the  dots  and 
dashes.  Once  a  character  has  been  entered  from  the 
Prestodigitizer,  the  program  searches  the  table  for 
characters  with  the  same  number  of  entries.  When 
one  is  found,  the  next  table  entry  is  compared  with 


5  REM  DIGITIZER  MORSE  PROGRAM 

6  REM 

7  REM  USE  REGION  1  TO  INPUT  A  DOT;  -. 

-iREGION  2  FOR  A  DASH;  REGION  7  TO  - 
-.END  INPUT 

8  REM 

9  REM  TO  END  PROGRAM,  TURN  COMPUTER  OFF 

10  DATA169, 0,1 41, 67, 232, 141. 215, 3,16  9,0, 

-.141,213,3,169,255,141.212,3 
20  DATA173,79,232,201,255,240,244,201, 

-.223,24  0,51,205,212,3,240,240 
30  DATA201,25  4,20  8,10,141,212,3,24,46, 

-.213,3,76,117,3 
40  DATA201,253,20  8,222,141,212,3,56,46, 

-.213,3 
50  DATA238,215,3,160,150,140,214,3,160, 

-.255,136,208,253,206,214,3,20  8,246 
60  DATA76, 76, 3, 169, 64, 141, 216, 3, 160,0, 

-.174,215,3,177,0,205,215,3,240,12, 

-.200,200 
70  DATA206,216,3,192,51,16,19,76,145,3, 

-.200,177,0,205,213,3,20  8,237 
80  DATA152,24,109,216,3,32,210,255,76, 

-.58,3,-1 
9 0  DATA2 ,1,4,8,4,10,3,4,1,0,4,2,3,6,4,0, 

-.2,0,4,7,3,5,4,4,2,3,2,2,3,7 
9 5  DATA4 ,6,4,13,3,2,3,0,1,1,3,1,4,1,3,3, 

-.4,9,4,11,4,12,0,0,-1 
100  1=826 

110  READ0P:IF0P=~1THEN125 
120  POKEI,OP:I=I+1:GOTO110 

125  1=5000 

126  READOP:IFOP=-1THEN130 

127  P0KEI,0P:I=I+1:G0T0126 

130  POKE0,136:POKEl,19:PRINT"R";:SyS826: 
-.PRINTPEEK{983)  ,PEEK(981)  :STOP 


location  QBl's  contents.  If  these  are  idcniiral,  the 
correct  ASCII  value  is  calculated  so  the  aljihabelic 
character  can  be  printed  on  the  PET's  screen.  If  no 
table  value  corresponds,  then  nothing  is  printed 
on  the  screen.  Since  this  is  just  a  sample  [jrogram,  it 
is  designed  for  the  user  to  be  able  to  input  characters 
forever,  and  the  only  way  to  terminate  the  [)rogram  is 
to  turn  the  computer  off. 

As  an  example  of  its  use,  to  input  the  Morse 
Code  for  the  character  I'',  which  is  ..-.,  the  user 
would  take  the  wand  and  touch  it  to  the  u|iper  left 
horizonlal  region,  lift  it  up,  touch  the  up[)er  left 
horizontal  region,  lift  it  u]),  touch  the  upper-  right 
horizonlal  region,  lift  it  up,  touch  the  upper  left 
horizontal  region,  lift  it  uj),  and  finally  touch  the 
vertical  region.  You  can  enter  this  code  remarkably 
fast,  but  you  niust  be  careful  to  hold  the  wand  per- 
pendicular to  the  region  when  you  make  contact, 
and  not  to  slide  the  wand  when  you  lift  it  irorn  the 
surface.  Otherwise,  since  lite  computer  will  accept 
consecutive  entries  from  the  same  region,  nunc  than 
one  entry  may  be  mistakenly  entered  because  of 
cither  the  uneven  surface  or  dirt  on  the  surface 
of  the  region. 

We  envision  that  this  arrangement  could  also  be 
used  by  the  blind  to  in]jut  braille  charactei's  lo  the 
computer,  since  the  braille  cell  arrangement  is  also  a 
two  column,  three  row  arrangement.  This  may  or  may 
not  be  an  easy  way  for  the  blind  to  input  characters 
to  the  computer,  but  at  least  it  gives  a  blind 
person  who  is  not  familiar  with  a  keyboard  a  way 
to  communicate  with  the  ct>tnpuler  in  a  familiar 
code.  All  too  often  people  devise  new  codes  for  the 
blind,  putting  an  extra  burden  ont  hem  in  that  the  code 
must  be  learned  before  it  can  be  used  by  them.  Why 
not  put  the  burden  on  the  programmer  to  incorporate 
the  braille  code  into  the  in[)ut  device,  thereby 
making  the  device  immediately  accessible  lo  the  blind 
for  their  use.  Program  3  will  translate  the  braille 
input  code  for  braille  letters  into  corresponding  screen 
characters.  The  disassembled  listing  for  Program  3  is 
the  6502  assembly  language  part  of  the  program.  It 
does  not  allow  repeat  selection  of  a  section,  since  it 
is  not  needed  in  defining  a  braille  character,  which 
is  a  combination  of  dots  chosen  in  a  six  cell  arrange- 
ment. 

For  example,  (he  letter  0  has  the  ii)!lu\ving  dot 
arrangements: 


This  can  be  signaled  to  the  computer  in  this  program 
by  the  user  taking  the  wand  and  touching  the  upper 
left  horizontal  region,  lifting  it  up,  touching  the 
middle  I'ight  horizontal  region,  lifting  it  up,  touching 
the  lower  left  horizontal  region,  lifting  it  up,  and 
finally  touching  the  vertical  region.  For  the  blind  to 
be  able  to  use  this  system,  they  must  ha\e  some 


July /August.  WflO.  Issue  S 


COMPUTE. 


Computer 
Supplies  for 

Small 
Computer 

Systems 


Our  full  line  of  supplies  includes: 

Dikettes  (3M,  basf) 

Diskette  retrieval  devices 

BPI  Business  Package  for  the  Commodore 

Tractor  Printer  Paper 

Tractor  Printer  Labels 

Printer  Ribbons  for  NEC,  Commodore  and  Xymec 

Dust  Covers 

Adapters 

Uncrashers 

Computer  Desks 

NEC  Spinwriters 

Print  Thimbles 

Xymec  Intelligent  Printers 

"New  Dealer"  Kits 


Zeigler 


ELECTRONIC 
^^RODUCTS 


DEALERS: 

Wc  no  longer  markt-t  COMMODORE 
Equipment.  (Jerry  Zctgler  is  wilh 
Commodore)  but  Connie  ^jnii  ]  have  thi' 
compulLT  supplies  you  need  lo  support 
Commodore  System  Sales. 


Give  us  3  call; 

Trudie  Zeigler 

or 

Connie  Ritlenberrv 

(401)  2SP'1596  or  2SP-2265 

36ol  CALUMET  RD. 
DECATUR,  GEORGIA.  33034 


NOW  YOU  ARE  A 

PART  OF  THE 

GREATEST  STORIES 

EVER  CREATED! 


IIMTERACTIVE 
FICTION  " 

What  is  It? 

Interactive  Ficlion  is  siory-ielling  using  a  computer,  so  that  you.  the 
rPfKltT,  can  ricludlly  take  part  in  the  story  instead  of  merely  reading  li 

How  does  It  work? 

T\v  computer  sets  the  scene  with  a  fictional  situation,  which  you  read 
from  the  CRT    Then,  you  become  a  character  in  the  story  when  ifs 
you/  turn  to  speak  you  type  in  your  response 
The  dialogue  of  the  other  characters  and  even  the  plot  will  depend  on 
whi\r  you  say 

Is  it  a  game? 

No,  In  a  game  the  situation  is  rigidly  defined  and  you  can  select  from 
only  a  limited  number  of  responses.  But  in  (nteiactive  Fiction  you  can 
say  anything  you  like  to  the  other  characters  (Of  course  if  your 
response  is  too  bizarre  they  may  not  understand  you) 

What  is  available  now? 

Rc3t)cri  Lafori>.  writer,  columnist,  and  programmer,  has  created  a  series 
of  works  in  Interactive  Fiction.  Eash  is  available  on  a  BW"  diskette  for 
use  on  a  TRS-80*  Levcl-ll  with  at  least  32K  memory  and  one  disk  drive 
(?pf(uia'5  user  to  tiave  a  copy  of  TRSDOS  2.2  or  23 
Six  Micro  StorJes  offers  a  good  introduction  to  Interactive  Fiction,  Six 
very  short  stories  involve  you,  the  reader,  in  a  variety  of  situations,  you 
are  an  American  spy  in  Hitler's  Third  Reicfi,  the  pilot  of  a  doomed  717. 
and  more 

Local  Call  for  C3eath  is  a  detective  story  in  the  style  of  Lord  Peter 
Wimsey  Considerably  more  challenging  than  the  above  program, 
tins  one  will  put  your  analytic  skills  (and  social  savoir-faire|  to  the  test 
Two  Heads  of  the  Coin  is  a  psychological  mystery  set  m  the  London 
of  Sne/locfc  Holmes  Mosi  challenging  of  all.  this  program  wid  tax  your 
observational  skills  and  above  all  your  imagination. 

Please  send  me  the  following  works  of  Interactive  Fiction. 

Six  Mfcro-Storles  S  !4  95 

Local  Call  for  Death         S  J  9.95    "Alio  avoMobl. 

Two  Heads  of  the  Coin        SI9  95    woridwid*  ((trough 

(FioncJa  residents  add  4%  sales  tax.|  rour  lotol  oidKen(ure 

6ta\att" 
Name  _^ 

Ai  Idlest  

City.  State.  Zip    .  ^?^ 

TO  ORDER:  Mail  the  above  form  with  your  pay-  '^iJkL 

ment  to   Adventure  International,  P.O.  Box        ^^^^^ — 

3435,  Longwood,  FL  32750.  ^^^^^ 

IVIastrrCharge      "  Vija  Che<;l<  CO.O.  ^^H^^H 

M.C.  or  Visa  Number:     ^^K    ^sL^^l 

Signature ^^^M^^^l 

'TRS-80  Is  a  tra^tmsrk  of  the  Tandy  Corporatton.  ^ 

adventure  international 
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means  ofclftcrmining  the  location  of  a  region  without 
making  any  contact.  For  this  purpose,  a  piece  of  Foam 
can  be  cut  the  size  of  the  board  and  notched  at  the 
up[)er  edge  for  the  blind  to  be  able  to  determine 
the  lop  of  the  board.  Then  cut  round  holes  over  each 
of  the  six  horizontal  regions  to  represent  the  braille 
cells,  and  a  vertical  region  to  represent  the  "end- 
of-character"  region.  See  figure  3  for  a  rough  sketch 
of  this  arrangement.  This  operation  takes  no  hard- 
ware skill  as  such,  and  certainly  serves  the  purpose. 

As  each  region  is  touched,  its  input  value  is 
converted  to  an  appropriate  power  oi  two  from  the 
table  which  starts  at  location  990.  These  powers  of  two 
are  added  together  to  uniquely  determine  a  number 
for  the  character.   I'his  number  will  point  to  the  ASCII 
vakie  of  the  al[)habe(ic  character  in  the  table  starling 
at  location  929.  Note  that  unused  numbers  have  a 
zero  entry  in  the  table.  Then  the  character  is  printed 
on  the  PET's  screen.  This  program  is  also  designed 
to  run  continuously,  and  can  only  be  terminated  by 
turning  the  computer  off. 

Several  new  codes  will  have  to  be  develo|>ed  for 
the  special  function  keys  such  as  RETURN,  STOP, 
SHIFT,  GRAPHICS,  and  CURSOR  keys  to  be  a 
fully  implemented  braille  programming  system.  We 
will  be  using  this  device  with  some  blind  pro- 
grammers and  will  try  to  develop  a  braille  compatible 
code.  We  welcome  other  people's  suggestions  in  these 
endeavors  and  hope  that  others  of  you  in  need  of 
"off-the-shelf  merchandise  will  start  to  look  at 
devices  designed  for  other  initial  purposes,  but  which 
may  in  fact  be  ideal  for  computer  applications  for 
the  handicapped.  Please  share  your  discoveries  with 
us.  The  information  you  provide  may  be  the  break- 
through others  need  in  order  to  solve  their  pro- 
gramming challenges. 

Figure  3 


i   \!-  VC./v    1    I  A 


#>  ^      ■"     y^^  --5-       ^^ 


5  REM  DIGITIZER  BRAILLE  PROGRAM 

6  REM 

7  REM  USE  REGIONS  ITHROUGH  6  FOR  THE  -. 

-.BRAILLE  CELL  INPUTS 

8  REM  USE  REGION  7  TO  END  INPUT 

9  REM  TO  END  PROGRAM,  TURN  COMPUTER  OFF 

10  1=826 

20  READOP:IFOP=-1THEN100 
30  POKEI,OP:I=I+1:GOTO20 
40  DATA16 9, 0,141. 67, 232, 169, 255, 141, 152, 

-.3,169,0,141,153,3,173,79,232,201, 

-.255 
50  DATA240,249,205,152,3,24Q,244,201, 

-1223,240,34,141-152,3,160,6 
60  DATA20 9, 6, 2 4 0,6, 13 6, 2 08, 2 4 9, 76, 6 3, 3, 

-.169,1,136,240,4,10,76,106,3 
70  DATA24, 109, 153. 3, 141, 153, 3, 76, 73, 3, 

-.172,15  3.3,192,60,48,3,76,63,3 
80  DATAl 92, 0,16, 3, 76, 63, 3, 177, 0,32, 210, 

-.255,76,63,3,-1 
100  1=929 

110  READOP:IFOP=-1THEN200 
120  POKEI,OP:I=I+1:GOTO110 
130  DATA0, 65, 0,67, 0,66, 73, 70, 0,69, 0,68, 

-.0,72,74,71,0,75,0,77,0,76,83,80,0, 

-.79 
140  DATA0, 78, 0,82, 84, 81, 0,0, 0,0, 0,0, 0,0, 

-.0,0,0,0,0,0,87,0,0,85,0,88,0,86 
150  DATA0, 0,0, 90, 0,89,-1 
200  1=990 

210  READOP:IFOP=-1THEN300 
220  POKEI, OP: 1=1+1 :GOTO210 
230  DATA25 4, 253, 251, 191, 247, 239,-1 
300  POKE0 ,161: POKEl , 3 : POKE 6 ,221: P0KE7 , 3 
400  PRINT"fi";:  SyS(826) 


Disassembled  Listing 

826:  LDA#  0 

STA  59459 
STA  983 

LDA  #0 
STA  981 
LDA#  255 
STA  980 


844: 


885: 


LDA  59471 

CMP#255 
BEQ-12 
CMP#  223 
BEQ  +51 

CMP  980 
BEQ.-I6 

CMP#254 
BNE   -I-  10 

STA  980 
CLC 

ROL  981 
JMP  885 
CMP#  253 
BNE  -  34 
STA  980 
SEC 

ROL  981 
INC  983 
LDY#  150 
STY  982 


For  Program  #2 

Set  LIstT  For!  I'fir  input. 

Location  983  will  rount  tin-  number  of 
ciui'ics  for  I'iicli  charattfr. 

Location  981  will  loniaiii  \\w  bit 
]>attt'in  for  tlic  cntrifs. 

Location  980  will  contain  the  last 

selection  and  is  preset  to  indicate 
no  selection  has  been  made. 

Look  for  an  input. 

If  none,  then  keep  !(Kikini{. 

If  it  is  the  vertical  section,  llien  a 

character  ha.s  been  completely 

entered,  so  go  to  the  table  lookttp. 
If  contact  ha.s  not  been  broken,  then 

keep  looking. 
Is  it  the  upper  left  horiaotual  region? 

li'  not,  then  go  to  the  next 

cjucstion. 
If  yes,  then  store  the  last  selection  in 

location  9fiO,  and  rotate  a  zero 

into  location  981 . 
Cotniniie  at  the  delay  loop. 
Is  it  the  upper  right  horizontal  region? 

If  not,  then  keep  looking. 
If  yes,  then  store  the  la.st  selection  in 

location  980,  and  rotate  a  one  into 

location  981 . 
Increase  the  entry  count  by  one. 
Delay  loop. 
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913: 


LDY#  255 
DEY 
BNE  -3 
DEC  982 
BNE  -10 
JMP  844 
LDA#  64 
STA  984 

LDY#0 

LDX  983 
LDA(O),  Y 

CMP  983 
BEQ  +  12 
INY 
INY 
DEC  984 

CPY#  51 
BPL   +  19 
JMP  913 
INY 

LDA(O),  Y 
CMP  981 


BNE 

TYA 
CLC 


19 


ADC  984 

JSR  <i5490 
JMP  826 


Go  back  iuld  keep  looking, 
Tabic  Look-up  starts  here.  Location 
984  will  hold  the  value  needed  to 
calculate  the  ASCII  of  the  character. 
If  it  is  the  same  as  the  last  input,  then 
keep  looking. 

I.()cation.s  I)  and  1  are  pointing  to  the 

start  of  (he  look-up  table. 
Kind  a  table  value  with  the  same 

ntnnbcr  of  entries. 


If  not  the  .saiTK',  update  the  .A.SCII 

information  location. 
If  beyond  the  table  limits,  then  ,t,'o 

back  to  looking  for  another  input. 
Otherwise,  keep  looking  in  the  lable. 

Is  the  entry  pattern  in  the  table  the 

same  as  liie  injjui  pattern  stored 

in  location  981 :' 
If  not,  then  keep  looking  in  the  table. 
Il  so,  then  use  the  table  location  to 

adjust  the  ASCII  value  stored  in 

location  984. 

(io  to  the  ])rinting  routine. 
Cjel  another  input. 


Disassembled  Listing  For  Program  #3 


826: 

831: 

841: 


874: 


LDA#0 
STA  59459 
LDA#  255 
STA  920 

LDA#0 

STA  921 
LDA  59471 
CMP#  255 
BEQ -7 
CMP  920 
BEQ -12 
CMP#  223 
BEQ  -1-34 

STA  920 
LDY#  6 
CMP(6),  Y 
BEQ  +6 
DEY 
BNE  -  7 
JMP  831 
LDA#  1 
DEY 
BEQ  +4 
ASLA 
JMP  874 
CLC 
ADC  921 
STA  921 
JMP  841 
LDY   921 


Set  User  Port  for  Input. 

Location  920  will  contain  the  last 

selection,  and  is  jjreset  to  indicate 
no  selection  has  been  made. 

Location  921  will  hold  the  eonibination 
inputs  for  a  braille  character. 

Look  for  an  input. 

If  none,  keep  looking. 

Il'"  il  is  the  same  as  the  last  input,  then 
kee]>  looking. 

If  it  is  the  \i-rtical  section,  then  a 
character  has  been  completely 
entered,  so  go  to  the  table  lookup. 

Store  the  input  in  location  920. 

Change  the  input  value  into  a  section 
number  which  is  stored  in  a  table 
to  which  locations  6  and  7  are 
pointing. 


Change  the  section  number  into  a 
power  of  two. 


.Add  to  pre\-ious  powers  entered  and 
store  in  location  921. 


Check  that  number  is  within  the  table 


cpy#  60 

BMI  -1-3 
JMP  831 
CPY#  0 
BPL  +3 
JMP  831 
LDA(O),  Y 


JSR  65490 
JMP  831 


range. 


Kind  the  ASCII  value  in  the  table  to 
which  locations  0  and  1  are 
pointing. 

Go  to  the  printing  routine. 

Get  another  input.  ^ 


D  &  R  2nd-Cassette  System 


FEATURES: 

•  Sanvo  Recorder  M2545A. 

•  Digital  Counter. 

•  Audio  Location  of  Programs 

Cueing   <eature  allows  you   to  Audlblv 
locate  programs  at  fast  forward  speeds. 

•  Includes   Interface   Module  and   all  Plugs 
fii  Cables. 

•  S83.00  Check  or  Money  Order. 

Add  S3. 00  tor  Stilpplng  and  Handling. 
Canada  (U.S.  Funds).  S6.00  S  &  H.  fWicti. 
4%   Tax.    Charge   Card    Customers   add    5%. 


I  . 


CREATIVE  SYSTEMS 
P.O.  BOX  402M 
ST.  CLAIR  SHORES,  Ml 
48080 


Yes! 

You  Can  Have 

Your  PET"  And 

Counter  Too. 

313-771-1392 

DEALERS  WRITE 


Flight 

^  PEN 

FOR  YOUR 
PET 

OR 

*^  APPLE 


I  Ready  to  plug  in. 

I  No  assembly  necessary. 

I  Bypass  the  keyboard  —  interact  directly  with  the  screen. 

I  Demonstration  program  included. 

I  Complete  documentation  so  you  can  write  your  own  programs 

n  BASIC. 
I  Use  lor  education,  business,  games,  home. 

I  MSNV  GAMES  MIU  OTHER  LtGHT  PEN  SDFTVVSRI  AVAILABLE 
MAIL  COUPON  OR  CALL  TODAY 


fT*  3G  Company,  Inc.  Dept.  CO         (503)  662-4492 
Vdl^  Rl.  3,  Box  28A,  Gaston,  OR  97119 

Rush  me  _3G  LIGHT  PENS    ::  PET  S31.9S         '"  Apple  J3J.9S 

lAdd  SV50  for  mailing  and  handling  —  S6-00  foreign  | 
Enclosed  IS         Chock  o!  Money  Order   _,   Master  Charge    L^  Visa 


Card  No. 

Signature 

NAME 

ADDRESS 

CITY 


Exp  ctate 


STATE 


ZIP_ 


REMEMBER,  3G  OFFERS  A  30  DAY 
UNCONDITIONAL  MONEY  BACK  GUARANTEE! 
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Al  Baker's 
Programming 

for  Atari/ Apple 

Programming  is  the  mos(  complex  and  least  organized 
oi' human  endeavors.  Well,  maybe  alter  the  U.S. 
Government  and  raising  children.  Many  people  have 
tried  to  bring  order  out  of  this  chaos.  In  this  column, 
I  will  join  that  noble  company.  With  your  help,  we  just 
might  pull  it  off. 

Two  of  my  favorite  computers  are  the  Apple  and 
Atari.  They  are  superbly  designed  machines.  (It's  not 
that  I  don't  like  the  PET.  I  do.  I  guess  I'm  just 
hopelessly  addicted  to  sound  and  color,  joysticks  and 
paddles.)  In  this  column,  I  am  going  to  help  you  use 
the  sound,  color,  and  attachments  of  these  two  com- 
puters. 

In  each  issue,  I  will  show  you  one  or  two  short 
routines  fully  utili/^ing  some  featuiT  of  an  Atari  or 
Apple.  I'll  put  the  routines  to  work  and  leave  you  with 
a  chance  to  work  on  a  programming  exercise, 
answered  in  the  next  issue. 

I  said  I  needed  your  help.  Send  me  any  routines 
you  have  and  would  like  to  share.  If  I  use  ihern,  you'll 
be  given  credit  as  the  source. 

The  Atari  Joystick 

This  month,  we  are  going  to  explore  the  Atari  joystick. 
The  position  of  a  joystick  is  read  with  the  function 
STICK.  The  joysticks  arc  numbered  from  0  to  3. 
Thus,  the  position  of  the  second  joystick  is  STICK(l). 
This  function  returns  the  number  15  when  the  joy- 
stick is  centered.  Here  are  the  results  of  STICK  for 
the  other  joystick  positions. 

14    10   6    11  15    7    9    5    13 

The  button  on  the  joystick  is  read  with  the  function 
STRIG.  STRIG(O)  reads  the  button  of  the  first  joy- 
stick. The  function  is  zero  if  the  button  is  pushed 
and  one  if  the  button  is  not  pushed. 

Most  programs  use  the  joystick  to  move  objects 
around  on  the  screen.  As  soon  as  the  program  needs 
a  yes  or  no  response,  however,  the  players  must  use 
the  keyboard.  This  is  inconvenient,  especially  when 
they  are  several  players,  none  sitting  close  to  the 
keyboard.  Why  not  use  the  joystick  to  make  the  selec- 
tion? 

Two  Entry  Menu  Selection 

Look  at  the  first  listing.  This  is  a  routine  which  u.scs 
the  joystick  to  get  a  yes  or  no  response  from  a  player. 
Line  45  turns  off  the  cursor  on  the  screen.  Lines 
60  through  140  set  the  default  answer  and  display  the 


Listing  1.  Two  Entry  Menu  Select 

The  words  in  the  boxes  arc  typed  using  the  Atari  key 

to  put  them  in  reverse  video. 


im  ENTRY  riEHU  SELECT 
FROM  JO'tSTICK 


10  REM   . 

20  Ret 

30  REM 

40  Rei 

43  RET-I  TURN  OFF  CURSOR 

45  POfCE  752.1 

47  Fff1 

50  REM  DEFhULT  ANSWER- 

60  W-="y" 

70  REM 

80  REM  DISPLAY  MENU 

30  REM  KY..VV  IS  POSITION  OF  YES 

100  REM  XM..YN  IS  POSITION  OF  NO 

105  REM 

110  POSITION  KY/r'Y 

120  PRINT  't?ESf'; 

130  FUSITION  H'N..YN 

140  PRINT  "HTi 

150  REM 

160  REM  SCm  ,jm-"STICK  FOR  YES 

170  REM 

180  IF  STICK(F1_AYER-lK>li  THEN  2S0 

190  ftr="Y" 

200  PuSITIi>LX;r'/rY 

210  PRINT  'tf^'j 

220  POSIT lOr^  KN/i'N 

230  PRINT  "f«j".; 

240  GOTO  130 

250  REM 

260  REM  SCAN  JJYSTICK  FOR  NO 

280  IF  STICk'( PLAYER- 1K>7  THEN  336 

290  H*="N" 

300  POSITION  XY.YY 

310  PRINT  "YES"; 

320  FtEilTIffl]  XN.YN 

138  PRINT 

340  GOTO  180 

350  REM 

360  REM  SCAN  TRIGGER  FOR  CHOICE 

370  REM 

3S0  IF  STR IQ;  PLAYER- i)  THEN  180 

390  REM 

400  REM  WE  mE  ANSWER 

410  REM 

420  F-R-INT  m 

options,  YES  NO,  on  the  screen.  The  defaiili  answer, 
in  this  case  YES,  is  highlighted  in  reverse  video. 

The  routine  assumes  that  the  word  YES  is  to  the 
left  of  the  word  NO.  If  the  joystick  is  moved  to  the 
left  then  lines  180  through  240  sets  the  answer  to 
Y  and  highlights  the  word  YES  on  the  screen.  If 
the  joystick  is  moved  to  the  right,  then  lines  280  to 
340  sets  the  answer  to  N  and  highlights  the  word  NO. 
Pushing  the  button  ends  the  routine.  This  i.s  handled 
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Listing  2.  Do  You  Love  Me? 

10  REM  ...  DO  VCiLi  LOUE  riE  ... 

20  REf1 

30  RBI 

40  REn  DECLARE  STRINGS  rtfC  CONSTANTS 

50  Din  ki-<  1 ) 

60  Cl=l 

70  REn 

80  REM  ASK  riV  CWCR  IF  HE  LOl-ES  flE 

90  REM 

95  GRAPHICS  0 

100  XV=12^YY=18 

110  XfJ=24-Vh^l8 

120  PLhVER=1 

130  POSITION  12.16 

140  PRINT  "DO  you  LOUE  ME?" 

150  bOSUB  1088 

160  REn 

170  REf1  RESra-IJ  TO  ANSWER 

180  REN 

190  POSITION  3.22 

200  IF  A*="Y"  TICN  PRINT  "  SHUCKS..   I 

LOt.-E  VOU  Ti30." 
210  IF  A*="N"  ThEH  PRINT  "i^LL,   I  UXE  Y 
OU  Wr'UHY.   O-^FFLE)" 
220  FOR  DELhY=1  TO  1000 
230  NEXT  DELAY 
240  L.OT0  95 
Sbd  REM 

970  REM  JOYSTICK  ROUTINE 
9Sd  REM  (DiariesED  ELSENHERE) 
99Q  REM 

1000  POKE  752..Cl:Af="Y" 
1010  POSITia-^  KY/rY-?  '^'.:  =  POSITION  m 
..'•iT-^?  "NO".! 

1826  IF  STia((PLAYER-CI)=ll  THEN  1800 
1630  IF  STia((PLHYER-Cl)=7  THEN  A*="N":P 
OSITION  KY.YY=?  "YES"; ^POSITION  XN.YN=? 
'H'..---GOTO  1020 

1040  IF  STRI&;PLhYER-CI)  THEN   1620 
1850  RETURN 

in  line  380.  The  IF  statemeni  is  true  if  STRIG 
(PLAYER-1)  is  1.  Rcmemljor  that  thi.s  means  the 
button  is  not  pushed.  The  program  io(>[).s  back  to  hne 
180  as  long  as  the  button  is  not  pushed. 

Lot.s  of  lines  and  REM  statements  take  uj)  mem- 
ory and  slow  the  program  down.  Look  at  tile  second 
listing.  Here  is  a  short  program  which  uses  the 
menu  selection  routine.  Tlie  routine  has  been  com- 
pressed into  lines  1000  through  1050.  The  program 
needs  no  explanation.  Play  it  and  get  some  fee!  for  the 
convenience  of  using  the  joystick  instead  ol  the  key- 
board. 

At  the  tone  the  number  is.  .  . 

Listing  3  is  another  joystick  input  routine.  This  time 
we  are  using  the  joystick  to  input  a  number.  It  is 
similar  to  the  first  routine.  Lines  60  through  140 
set  the  default  input  numbci-  and  print  it  on  the 


Listing  3.  Number  Select 

10  RB1  . . .  H.IMBER  SELECT  . . . 

20  REM  FROM  JOYSTIOC 

30  REM 

40  REM 

43  REM  TURN  OFF  CURSOR 

45  POKE  752. 1 

47  RB1 

50  REM  DEFftULT  Af-ISWER- 

60  A=iei 

70  REM 

80  REM  DISPLAY  NUMBER: 

90  REM  X.Y  IS  POSITION  Cf  HrfBER 

105  REM 

110  POSITION  y.A' 

120  PRINT  A.i"  "; 

130  FOR;  SND=0  TO  15 

135  SCIINO  0..100-H.10.15-:5fCi 

140  t€Xr  SHD 

150  REM 

la^  REM  SCAN  JOYSTICK  FOR  SiLETRACT 

165  REM  DON'T  GO  BELOW  im  LIMIT 

170  REM 

180  IF  STia«FlAYER~lX>li  THEN  2S0 

185  IF  A=LaJ  THEN  180 

190  A=H-1 

240  QJTO  118 

250  REM 

260  REM  SCm  .XiYSTICK  FOR  m 

265  REM  DOfrT  GO  AEOUE  HH^  LIMIT 

270  REM 

Zm  IF  ST ICKX  PLAYER- 1K>7  THEN  388 

285  IF  A=Him  THEN  183 

290  A=A+1 

340  GOTO  110 

350  REfl 

360  R€M  SCAN  TRIGGER  FOR  CHCaCE 

370  REM 

380  IF  STRI&:  PLAYER-1)  THEN  188 

390  REM 

408  REN  WE  mE   ANSWER 

410  REM 

420  PRINT  A 

screen.  Notice  that  line  120  prints  a  blank  after  the 
number.  This  prevents  garbage  from  appearing  on  the 
screen  if 'A'  goes  from  2  digits  to  1  digit. 

Look  at  lines  130  through  140.  This  generates  a 
muted  bell  sound,  very  similar  to  striking  a  xylophone. 
The  SOUND  statement  has  four  parameters.  The 
Hrst  is  the  sound  register.  This  can  be  any  number 
from  0  to  3.  Up  to  four  sounds  can  be  created  at  one 
lime.  The  second  parameter  is  the  pitch  of  the  sound. 
The  higher  the  number,  the  lower  the  pitch.  Using 
100-A  gives  a  pitch  that  goes  up  as  A  gels  bigger  and 
goes  down  as  A  gets  smaller. 

The  third  parameter  is  the  sound  c|uality.  A  10 
gives  a  clear  tone.  The  fourth  parameter  is  the  loudness 
of  the  note.  The  note  goes  from  15-0  =  15  or  loud  to 
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15-15  =0  or  C|uict.  Tliis  frrau-s  ilic  bt-ll  (.'fTtHM. 

Lines  180  through  240  ck'tTL-asc  llu-  injiut  luiinbcr 
as  long  as  the  joystick  is  pushed  to  the  Icit. 
Lines  280  through  340  increase  the  input  nunibcr  as 
lotig  as  the  joystick  is  pusiieci  to  the  right.  Line 
380  ends  tlie  routine  il'  the  button  is  puslned. 

Conclusion 

Next  time  we  will  compress  the  number  input  routine 
and  use  it  in  a  program.  I'ry  it  yoursell' and  let's 
see  who  does  a  better  job  at  compressing  it!  We'll 
also  try  our  hand  at  using  the  Apple  paddles  lo  do  a 
menu  select. 

A!  Baker  is  Programming  Director  of  The  Image  Producers, 
Inc.,  615  Academy  Dr.,  Northbrook,  IL  60062.  © 

TINY  PASCAL  for  the  PET 
and  APPLE  II 

ABACUS  SOFTWARE  has  announced  the  avail- 
ability of  its  TINY  PASCAL  to  run  on  either  the 
PET  or  APPLE  II  personal  computers. 

TINY  PASCAL  is  a  complete  package  allowing 
the  user  to  create,  compile  and  execute  prograins 
written  in  the  TINY  PASCAL  language.  The  TINY 
PASCAL  language  is  a  subset  of  the  full  standard 
PASCAL  language  but  includes  the  structured  pro- 
gramming features:  IF-THEN-ELSE,  WHILE-DO, 
CASE-OF-ELSE,  FOR-TO/DOWNTO-DO  and 
REPEAT-UNTIL.  This  block  structured  language 
allows  for  functions  and  procedures  using  local  or 
global  variables. 

TINY  PASCAL  has  three  components: 

The  LINE  EDITOR  allows  you  to  create,  modify 
and  save  source  language  statements  written  in  the 
TINY  PASCAL  language. 

The  COMPILER  tran.slatcs  the  source  statements 
into  an  intermediate  P-codc  that  is  ready  for  execution. 
The  INTERPRETER  executes  the  P-code  by  turning 
the  PET  or  the  APPLE  II  into  a  pseudo  16-bit 
stack  computer-  Trace  and  single-step  modes  are  built 
into  the  INTERPRETER. 

The  source  statements  and  the  P-code  files  may  be 
saved  on  either  tape  or  diskette.  The  APPLE  II 
version  supports  diskette  only.  Includes  comprehen- 
sive user's  manual. 

REQUIREMENTS: 
PET  1 6K/32K  NEW^  ROMS  Cassette  $40 

PET  16K/32K  NEW  ROMS  Diskette  $35 

APPLE  II  32K  ROM  Applesoft  w/DOS  $35 

APPLE  II  48K  RAM  Applesoft  w/DOS  $35 

TINY  PASCAL  User's  Manual  $10 

(refundable  w/software) 
6502  Interpreter  Listing  $20 

For  more  information  contact: 
ABACUS  SOFTWARE 
P.O.  BOX  7211 
GRAND  RAPIDS,  MI  49510  @ 


PET/BETA-1  jlfc^    "le    (loppy  disk   alternative 

•  uanslers  at  4300  baud 

y^^^^^y    ■ '~~"  •S00Kstor,.3.;,Kr  drive 

/  IJ~       _     V,    i^  •  complele  hardware  and 

!■"*    v0^  sohware  sv^Icm 

FLEXIBLE  DATA  MANAGEMENT  .  .  .  MICROPROCESSOR 
CONTROLLED  BETA  1  UNIVERSAL  TAPE  DRIVE  BY  MECA'  .  .  . 
PERIPHERAL  DEVICE  WITH  COMPLETE  SOFTWARE  SUPPORT 

COMPARE  OUR  FEATURES: 

SPEED  Loads  jrKl-jves  at  4800  bautl.   Seeks  al  1 20" ''jCC 

STORAGE  Each  BETA  1  drive  stores  525.000  byles  or  252  teamed  programs  or 

filei  on    a   srngtfi  cassette.    Expands   lo    fDur   drivrt-lwo   megabvtes 

OPERATING  24   commands.    27   error   messages.  2   user-delined   commands-fullv 

SYSTEM  compatible   with   PET    BASIC.    Resides   in  only  4K-at)breviated   2K 

i/crsion,  bootstrap  loader,  all  romabic 

FILE  Named  liles.  directories,  program  draining  snd  metging,  sequential  and 

COMTROL  randor^i  access  Mies,  fietd  and  record  delinitiotis.  and  more  .  .  . 

BETA!  DRIVE.  PETiBETAl  OPERATING  SYSTEM.  MANUAL S52S.DO" 

ADDITIONAL  BETA  t  SLAVE  DRIVES - ■■    319.00 

MANUAL  lapplicable  to  purchase)... '0-00 

ALL  SYSTEMS  FULLY  ASSEMBLED  AND  TESTED  FOR  NEW  AND  OLD  PET 


1-512-477-2267 


:S  <=> -f= -t  u>  3il— ^ 

1903  Rio  Grande 

fiustiri.  Texas 

78705 

•     FSSISANAUTHOniZLDMirCAlNC     OtALC* 

'.TEXAS  RESIDCNT-S   *OD    !.-.  SALES  Tax 

PET   IS  A    BECilSTEftED    TRADEMARK    OF   COMMODOnC    INC. 


>m.5«.  1  T   <:;cDrftK>u-t^i"3 


P.O.  Box   8403 

Austin. T»xas 

7B712 


DISK  DRIVE  WOES?   PRINTER  INTERACTION? 

MEMORY  LOSS?    ERRATIC  OPERATION? 

DON'T  BLAME  THE  SOFTWARE! 


ISO-1  '~\\      tSO.2 

Power  Line  Spikes,  Surges  &  Hash  could  be  the  culprit! 
Floppies,  printers,  memory  &  processor  often  interact! 
Our  unique  ISOLATORS  eliminate  equipment  inttjtaction 
AND  curb  damaging  Power  Line  Spikes,  Surges  and  Hash. 
'ISOLATOR  (ISO  1A)  3  filter  isolated  3  prong  sockets; 
integral  Surge/Spike  Suppression;  1875  W  Maximtjm  load, 

1  KW  load  any  socket     S56.95 

•ISOLATOR  (ISO-21  2  filtar  isolated  3prong  socket  banks; 

(6  sockets  total);  integral  Spika/Surge  Suppression; 

1875  W  Max  load,  1  KW  either  bank $56.95 

•SUPER  ISOLATOR  (ISO-3),  similar  to  ISO-1  A 

except  double  filtaring  &  Suppression  ....  $85.95 
"ISOLATOR  (ISO-4),  similar  to  ISO-1  A  except 

unit  has  6  individually  filtered  sockets  ....  $96.95 
•ISOLATOR  llSO-5),  similar  to  ISO  2  except 

unit  has  3  socket  barks,  9  sockats  total  .  .  .  S79.95 
•CIRCUIT  BREAKER,  any  model  (add-CB)  Add  S  7.00 
•CKTBRKR/SWITCH/PILOTany  model 

(CBS)        Add  S14.00 

PHONE  ORDERS  1617-655-1532  "g" 

ZkV  Electronic  Specialists.  Inc.    ^"" 


171  South  Main  Slreal.  Nalick.  Miss.    01760 
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you  read  about  the  Dungeonmaster  who  became  so 
enchanted  playing  a  real  life  version  of  Dungeons  and 

Dragons  that  he  disappeared  for  a  month? 

You'll  be  able  to  hold  on  to  reality  just  a  little  better  when  you  play 
the  Dunjonquest™  computer  version,  the  greatest  of  all  the  role-playing 

fantasies. 

But  don't  bet  on  it. 


Sit  at  your  computer.  You'ri;  the  hero.  Enter  the 
Dunionijuest  "Temple  of  Apshai"  and  into  the 
j;reatest  fantasy  adventure  you've  ever  experienced. 
The  Temple  has  over  200  rooms  and  catacombs  In 
which  lurk  more  than  30  kinds  of  monsters  and 
beasts  ready  to  do  you  in  — in  real  time  — before  you 
can  reach  any  of  the  70  or  so  treasures  waiting  for  the 
hero.  You  may  spend  days,  weeks,  months. ,  .the  rest 
of  your  life. .  .strikinj;  at  the  forces  of  evil,  or  running 
from  them,  or  calling  on  powers  you  can  never  com- 
pletely understand.  Always,  always  demonstrating  in 
varying  degrees  your  strength,  constitution,  dexterity, 
intelligence,  intuition,  the  force  of  your  ego. 


Unlike  chess  or  britlge  or  monopoly, 
this  role-playing  game  —  like  other  good 
role-playing  games  —  is  an  experience 
rather  than  a  game;  it  is  not  played  so 
much  as  it's  lived  or  experienced.  Your 
alter  ego  goes  forth  into  the  world  of 
demons  and  darkness,  dragons  and 
dwarves.  Your  character  will  do  what- 
ever you  want  him  [or  her  or  it]  to  do. 


Actual  photo  of  screen  during  a  DunjonquesI  game, 

In  Room  3  in  the  Temple  of  Apshai,  our  hero  observes 
two  treasures  unattended  by  dragons,  monsters  or 
demons  ...  for  the  moment.  He  is  completely  free  of 
wounds;  he  is  not  at  all  fatigued.  He  carries  44  pounds  of 
armor  and  19  arrows  in  his  quiver.  He  has  already  slain 
five  demons.  Will  he  capture  the  treasures  before  moving 
on.. ,  or  before  the  forces  of  darkness  intercept  him? 


"The  Temple. . .  "  comes  cimiplcte  with  a  superbly 
illustrated  56-page  rule  book  and  cassette  program, 
designed  to  operate  with  the  Level  II  16K  TRS  80,  the 
PET  ,32K  or  the  Apple  II  48K  |Applesoft)  computer. 
Only  $24.95  complete,  including  shipping  and 
handling  on  orders  placed  within  the  next  30  days, 
(Apple  or  TRS  HO  disk  available  for  529,9.51. 

Dunionqucst's  "The  Temple  of  Apshai"  is  guaranteed 

to  be  the  best  version  of  Dungeons  and  Dragons/ 
Dragons  and  Dungeons.  It's  a  product  of  the  two  guys 
who  are  Automated  Simulations:  fim  Connelley  and 
Ion  Freeman,  lim  is  a  Dungeon  Master,  running  con- 
tinuous V)  &  D  campaigns.  He's  been  a  data  pro- 
cessing professional  with  Westinghouse,  GTE 
Sylvania,  Logisiicon  . .  .an  expert  in  computer-based 
math-modeling  and  in  simulation  of  complex  phe- 
nomena. Jon  is  a  game  player,  designer  and  author. 
He's  a  frequent  contributor  to  Games  magazine;  his 
book,  "The  Playboy  Winner's  Guide  to  Board 
Games"  is  a  paperback  best -seller. 

As  we  said,  guaranteed:  Guaranteed  to  be  the  best 
version;  guaranteed  that  ytju'll  be  happy  with  it. 
Order  now,  use  it  for  two  weeks.  If  you  don't  enioy 
completely  this  fantasy  adventure  experience  (hat 
gties  beytmd  all  others,  send  it  back  to  us.  We'll 
refund  your  money  in  full;  no  questions  asked. 

Master  Charge  or  Visa  card  holders:  charge  "The 
Temple  of  Apsfiai"  to  your  credit  card.  Just  call  our 
toll  free  number:  (800)  824-7888,  t)pcrator  861  (In 
California,  call  operator  861  (800)  852-7777,  In 
Hawaii  and  Alaska,  operator  861  (800)  824-7919)  and 
you  can  begin  enjoying  your  Dunjonquest  game  in 
days.  Or  send  your  check  for  $24.95*  (or  $29.95)'  to 


Automated 
Simulations 


Dept.  K 
P.O.  Box  4232 
Mountain  View, 
CA  94040 


■California  residents,  please  add  5.5%  lax 


38  COMPUTE.  July/August,  1980.  Issue  5 


OTHER  NEW  PRODUCTS:  ImMti  A  HI^OM 

-Screen  formatting/editing  M/lWi^v  !_•  I O  V-/ 1  N 
-Printer  drivers  for  NEC,  TI-810, 
and  other  ASCI!  printers 


OMPUTER 


YOUR  COMMUNICATING  PET 

Your  PET  can  now  become  an  intelligent  terminal:  send  and  receive  Word  Pro  files  and 
programs.  Your  PETcan  communicate  with  mainframes  and  other  PETs.  The  PET  can  com- 
municate simultaneously  with  another  PET,  or  you  can  transmit  entire  files.  This  package 
can  be  incorporated  into  your  programs,  used  for  business  applications  or  two  player  games. 
Works  on  new  PETs  with  40  or  80  column  screens  and  comes  with  demonstration  programs. 
Price:  $195.00 

Features  include: 

-Full  and  half  duplex,  also  local  echo. 
-Supports  odd,  even  and  mark  parity. 
^  -CRC,  error  checking  for  PET  to  PET  files. 

\'\       1825  MONROE  STREET,  MADISON,  Wl    53711    (608)255-5552     ^^^^ 


ip 


SOFTWARE  SPECIALISTS  MICROPHYS  PROGRAMS  SCIENCE  AND  EDUCATION 

2048  FORD  STREET  ^p 

BROOKLYN,  NEW  YORK  11229  (212)  646O140 

Mierophys  has  designed  a  program  to  creale  cryplograms  trom  various  lines  ol  lexl  which  are  enlered  by  the  user.  The  enclosed  cryptogram  is  Ihen  displayed  aking  with  its 

unique  cryptogram  code  number.  To  decode  Ihe  cryptogram,  the  program  is  run  Irgm  line  9000  as  described  below 

The  message  to  be  encoded  should  be  entered  by  user  #t.  The  computer  will  ther  generate  the  cryptogram  which  should  be  detiiphered  by  user  tiZ. 

To  receive  assistance  in  decoding,  or  to  have  the  entire  cryptogram  deciphered,  user  #2  should  run  the  program  trom  line  9000  THe  computer  will  request  the  entry 

ot  the  crypligram  code  number  and  then  the  entry  ot  the  lines  to  Pe  decoded.  User  t2  may  enter  a  single  letter,  a  word,  or  the  complete  text  to  be  decoded.  The  computer 

will  respond  by  displaying  the  corresponding  deciphered  letter,  word,  or  text. 

The  program  will  permit  user  #1  to  create  an  encoded  message  which  he  may  mail  or  Iransmil  to  user  #2,  assuming  both  users  nave  access  to  the  cryptogram  program  The  code 

number  should  also  be  included  with  Itie  message  in  order  lo  permit  user  #2  to  have  his  computer  decode  the  message  it  he  encounters  dilticulty 

The  cryptogram  program  is  designed  lor  use  with  eilher  SK  or  16/32K  PET  computers  It  is  provided  on  cassette  tape,  comes  with  complete  instructions,  and  sells  tor  $20.  It  may 

be  obtained  from  your  local  computer  dealer  or,  il  unavailable,  it  may  be  purchased  direclly  trom  Mierophys. 

iMote   A  tree,  educational  soltware  catalogue  is  available  upon  request  Irom  Mierophys  This  catalog  describes  over  140  programs  currently  available. 


SOFTWARE  SPECIALISTS  MICROPHYS  PROGRAMS  ^^'^^^^  ^^^  education 

2048  FORD  STREET    BROOKLYN.  NEW  YORK  11229  (212)  646-0140  P 

Microptiys  is  pleased  to  announce  a  series  of  exciting  word  games  whicti  will  provide  tiours  of  challenging  fun  for  virtually  all  age  groups. 

Players  (ill  in  missing  letters  in  a  randomly  chosen  title  or  phrase  and  are  awarded  points  according  to  the  graphic  display  on  a  "Wheel  of  Fortune". 

The  scores  for  each  of  2  to  4  players  are  recorded.  1000  points  being  required  lo  win  the  game. 

The  programs  are  intended  for  use  on  a  Commodore  PET  with  a  minimum  of  8K  storage,  and  on  the  Apple  II  microcomputer .  The  present  word 

games  available  are: 

PC375  Song  Titles   PC378  Statesmen         Each  program  sells  for  S10,  You  may  select  any  two  programs  lor  $15, 

PC376  Famous  Places  PC379  Scientists 

PC377  Entertainers       PC3aO  Sports  Figures 

Please  enclose  check  or  money  order  and  mail  to  the  above  address.  II  you  have  an  SK  PET,  be  sure  to  specify  old  or  new  roms. 

Attention  Cryptogram  Fans:  Create  and  decipher  coded  messages  with  the  unique  "CRYPTQ-  program  available  now  from  Mierophys  for  $20, 
specify  Apple  or  PET  versions. 

Note:  A  free,  educational  software  catalogue,  describing  over  140  programs  in  physics,  chemistry,  mathematics,  vocabulary  and  spelling, 
is  available  upon  request  from  Ivltcrophys. 
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Fun  With  the 
6502 

Len  Lindsay 

1929  Northport  Drive  #6 

Madison,  Wl  53704 


A  TALKING  PET 

Yes,  it  is  true.  You  now  can  buy  a  PET  program 
for  a  mere  $15.95  that  will  LOAD,  RUN  and  TALK. 
The  only  attachment  you  need  is  a  speaker  attached 
for  CB2  sound  (two  wires  connected  to  pins  M  &  N 
of  the  user  port-  see  Compute  #1  or  Best  of  the 
PET  Gazette  for  details  on  how  to  hook  up  the  sound). 
The  same  speaker  you  may  be  accustomed  to  using 
for  sound  effects  in  PET  programs  now  can  be  used  to 
let  your  PET  talk. 

The  program  is  TALKING  CALCULATOR 
from  Programma  (3400  Wilshire  Blvd,  Los  Angeles, 
CA  90010).  It  comes  professionally  packaged  (as  are 
all  their  programs).  It  LOADed  the  first  time  for  me. 
The  fact  that  the  program  only  will  let  your  PET 
function  as  a  calculator  is  completely  over  shadowed 
by  having  it  talk  to  you  as  you  calculate. 

Although  it  has  a  limited  vocabulary,  it  can  talk 
you  through  all  your  calculations.  It  can  pronounce 
the  name  of  all  10  digits  0  thru  9  as  well  as  the 
words  "plus",  "minus",  "times",  "divided  by", 
"equals",  "point",  and  "clear".  A  picture  of  a 
calculator  is  displayed  on  the  screen.  The  program 
will  speak  each  digit  as  you  enter  it,  and  will 
update  the  calculator  display  as  well.  Hit  the  "5" 
key  and  it  says  the  answer  for  you,  as  it  prints  it  on 
your  calculator's  display.  The  problem  6+6  has  an 
answer  of  "one",  "two",  not  "twelve".  Each  digit  is 
treated  individually,  and  the  decimal  point  is  pro- 
nounced as  "point". 

Although  you  can  buy  a  calculator  for  less  than 
this  program,  it  is  definitely  worth  having  the  program 
for  its  ability  to  talk.  Kids  will  love  it. 


ATARI  SOFTWARE 

Image  Computer  Products  (615  Academy  Drive, 
Northbrook,  IL  60062)  has  a  line  of  ATARI  soft- 
ware. I  have  four  of  their  cassettes.  They  are  very 
attractively  packaged,  and  the  tapes  each  LOADed 
the  first  time  for  me. 

All  Star  Baseball  (#6401)  is  a  very  well  done, 
and  interesting  game.  The  tape  comes  with  two 
versions  of  the  game.  The  first  requires  only  an  8K 
ATARI  and  uses  the  keyboard  for  user  interaction. 
A  16K  version  is  on  the  other  side  of  the  tape.  This 
version  allows  the  use  of  joysticks  for  each  player. 

The  game  is  for  two  players.  One  is  the  Home 
team,  the  other  the  Visitor.  The  player  at  bat, 
simply  hits  the  SPACE  bar  to  swing  at  the  pitch 
(or  hits  the  RED  button  on  the  joystick).  Timing 
is  important.  The  other  player  gets  to  pitch  the  ball, 
and  can  control  its  speed  as  well  as  its  course.  He 
can  slow  the  ball  down  just  before  it  reaches  the 
plate,  or  add  a  final  "curve"  to  the  pitch. 

The  game  employs  beautiful  high  resolution 
graphics,  and  includes  nicely  drawn  fielders  and  each 
runner  (if  any)  on  base.  The  game  is  animated  as 
well.  Hit  the  ball  and  watch  it  go  into  the  field  (or 
into  the  stands  for  a  foul  ball).  At  times  the  computer 
will  declare  the  hit  an  "out"  or  a  hit  ("single", 
"double",  or  "triple")  or  it  may  leave  the  outcome 
up  to  the  fielders.  The  player  who  pitched  the  ball, 
must  control  the  fielder,  trying  to  catch  the  ball 
for  an  out.  If  he  misses,  it  is  an  error,  and  the 
computer  declares  the  type  of  hit  as  a  result.  A 
home  run  goes  over  the  fence  (too  bad  the  fielders 
can't  jump  that  high). 

After  each  inning,  a  scoreboard  is  presented 
for  the  players  review.  Hit  the  space  bar  or  red 
joystick  button  to  continue.  The  game  is  over  after 
nine  innings.  The  game  is  very  realistic,  and  lets 
each  player  in  on  the  action.  However,  the  program 
has  one  frustratig  aspect.  It  determines  whether  a 
pitch  is  a  "ball"  or  strike"  after  the  ball  is 
past  the  plate.  Thus  it  is  very  easy  (and  tempting) 
to  pitch  the  ball  far  outside  (beyond  the  batters 
reach)  and  hook  the  ball  in  again  after  it  reaches 
the  plate.  This  guarantees  a  strike.  It  is  possible 
to  hit  it,  but  it  will  always  result  in  a  foul  ball. 
The  game  is  alot  of  fun.  If  you  like  ATARI  BASKET- 
ball,  you  should  enjoy  this  BASEBALL  game.  ( 

A  Column  in  Transition: 

The  Consumer  Computer  column  is  turning  into  Fun  With  the 
6502.  Len  's  new  column  will  cover  strategic  games,  contests,  and 
other  "leisure-lime"  software  news  and  activities.   Watch  Issue  6 Jar  his 
expanded  column.  Space  didn  't  permit  reviews  of  other  Image  software, 
but  Len  also  looked  at  Mind  Master  (§6403),  Strategy  Pack  1 
(#6-}04).  and  Strategy  Pack  11  (#6405).  Of  Ihae,  his  only 
"NOT  RECOMMENDED"  was  MindMa.-.tcr. 
RCL 
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Dear  Apple  Readers: 

Here's  a  revised  and  expanded  Apple  Gazette. 
We  need  your  help  and  input  to  keep  it  that  way. 
We're  interested  in  product  reviews,  short  program- 
ming hints  and  application  notes,  and  how-to  articles. 
Help  keep  the  Apple  Gazette  healthy!  Submit  your 
articles  to  Robert  Lock,  Publisher/Editor, 
COMPUTE,  P.O.  Box  5406,  Greensboro,  NC,  27403. 
Please  mark  the  outside  of  the  envelope  clearly  vviih 
"Attn:  Apple  Gazette'.  © 


BOOK  REVIEW 

Computer 

Graphics 

Primer 


author:  Mitchell  Waite 
publisher:  Howard  W.  Sams 
book  #  21650/$12.95 

Review  by  Eric  Rehnke 


For  a  really  excellent  introduction  to  computer 
graphics  get  this  book.  In  2  chapters  the  authore  takes 
you  fVom  answering  your  initial  questions  on  what 
graphics  are  and  what  kinds  of  things  they  can  do  to 
how  they  do  the  things  they  do  and  a  survey  of 
some  of  the  more  popular  computers  with  built-in 
graphics.  Lots  of  good  data  here  including  block 
diagrams  of  some  graphic  displays  and  information  on 
one  particular  LSI  color  video  chip,  the  AMI  68047. 

As  informative  as  the  first  two  chapters  are,  the 
third  chapter  alone  would  justify  the  cost  of  the 
book.  Lots  of  in-depth  explanations  of  the  Apple 
graphics  programming  interface  in  particular,  and 
many  programming  examples.  The  most  important 
stuff  in  the  whole  book  was  the  detailed  explana- 
tion of  how  the  Apple  shape  tables  are  designed 
and  how  they  can  be  used  to  build  a  graphic 
character  that  can  be  made  to  grow,  shrink  and 
rotate  under  software  control.  That  alone  should 
keep  me  busy  for  awhile. 

Other  things  that  were  discussed  in  the  book  in- 
clude other  types  of  graphics  I/O  devices  like 
digitizer  pads,  light  pens,  plotters,  joysticks,  digi- 
tal cameras,  and  iiriage  digitizers. 

I  can't  really  say  enough  about  Computer 
Graphics  Primer  except  that  it  would  prove  very 
useful  to  anyone  even  remotely  interested  in  computer 
generated  graphics,  and  INDISPENSABLE  to  anyone 
who  owns  a  Apple.  © 
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NCC  '80  And 
The  APPLE  III 


Joseph  H,  Budge 


By  now  everyone  has  heard  of  the  Apple  III,  but  no 
ones  knows  much  about  it.  In  May  I  was  able  to  view 
the  Apple  III  at  NCC  '80  in  Anaheim.  Apple 
computer  put  on  a  special  demonstration  for  the 
Internationa]  Apple  Core  which  I  was  able  to  attend. 

According  to  Apple,  the  Apple  III  was  designed 
specifically  for  high  capability  use  by  professional 
and  managerial  people.  It's  features  include  a 
new  Apple-designed  central  processor,  up  to  128K 
bytes  of  main  memory,  a  self-contained  floppy  disk 
drive,  and  a  new  keyboard  design  with  10-key  pad 
and  programmable  keys.  Video  allows  for  80-column 
by  24-row  text  in  black  and  white,  or  40  x  24  in  16 
colors  as  well  as  high  resolution  graphics.  The  III 
also  has  four  analog  to  digital  (A/D)  converters,  one 
digital  to  analog  (D/A)  converter,  and  a  programmable 
character  generator.  Software  available  for  the  III 
will  include  Apple  Business  Basic,  Fortran,  Pascal, 
and  Pilot.  Apple  Business  Basic  will  include  PRINT 
USING  with  string  justification  and  18-digit  mathe- 
matics. Pilot  is  a  teaching  language  with  enhanced 
graphics  for  the  III. 

As  a  professional  tool  the  Apple  III  will  be 
promoted  as  part  of  application  packages.  At  least 
three  application  packages  are  pending.  The  first, 
to  be  available  in  July,  will  be  the  Information 
Analyst  package.  It  will  contain  an  Apple  III  with 
96K  bytes  of  RAM  and  a  12-inch  black  and  white 
monitor.  Software  will  include  Apple  Business 
Basic,  a  mail  list  manager,  and  Visicalc  III.  Visi- 
calc  III  is  Personal  Software's  Visicalc  with  new 
features  and  functions  added.  Visicalc  III  has  been 
additionally  enhanced  to  utilize  the  Apple  Ill's 
larger  display  and  memory.  Base  price  for  the  infor- 
mation analyst  package  will  be  $4,400. 

The  second  application  package,  available  in 
September,  will  be  the  Apple  III  word  processor.  In 
addition  to  the  hardware  of  the  Information  Analyst, 
this  package  will  include  the  buyer's  choice  of  two 
printers.  Either  a  Silentype  thermal  printer  or  a 
Q_ume-typc  letter  quality  printer  will  be  available. 
The  Silentype  plugs  directly  into  the  back  of  the  III, 
while  the  letter  quality  printer  will  include  an  inter- 
face card,  Software  for  the  package  will  feature  a 
word  processor  and  word  processor  training  course. 
Base  price  will  be  S5,400  with  the  Silentype  or 
$7,800  with  the  letter  quality  printer. 

The  third  application  package  will  be  a  software 
development  package.  This  will  come  with  a  128K 


Apple  III,  a  12-inch  black  and  white  monitor,  and  a 
Silentype  printer.  All  Apple  III  languages  will  probably 
be  included.  No  price  or  release  date  has  been 
announced,  but  look  for  it  in  6-9  months. 

All  options  from  each  application  package  will 
be  available  separately.  Extra  disk  drives  and  memory 
will  probably  be  in  most  demand.  The  memory  up- 
grade, from  96K  to  I28K,  will  be  priced  at  $500. 
The  Apple  III  will  be  available  by  itself,  of  course, 
although  Apple  has  not  announced  the  price  or  antici- 
pated availability  date  for  the  hardware  alone. 

The  III  will,  indeed,  be  a  great  business  com- 
puter. But  it's  also  the  ultimate  hobby  computer. 
Listen  to  Wendell  Sanders,  the  Ill's  designer:  "What 
do  you  expect?  They  gave  me  a  blank  check  and  told 
me  to  go  build  a  computer.  It's  the  ultimate  home- 
brew! 

To  understand  the  III,  you  really  need  to  know 
something  about  it's  processor.  The  processor  is  built 
around  a  6502A  running  at  2MHz.  The  fact  that 
there's  a  6502  chip  in  there  is  a  bit  misdirecting. 
A  large  number  of  support  chips  are  hooked  onto  the 
6502  which  lift  h  out  of  the  microprocessor  class 
and  into  the  miniprocessor  class.  Output  from  the 
6502  goes  to  a  PIA  and  a  ROM.  Outputs  from  those 
two  devices  feed  back  to  each  other  and  to  the  6502. 
About  a  dozen  other  logic  chips  are  thrown  in  for 
good  measure,  just  to  confuse  the  issue.  Apparently 
the  ROM  is  the  key  to  the  whole  system.  It  doesn't 
act  like  memory,  as  in  the  Apple  II.  Rather,  it's  a 
giant  logic  gate  with  many  thousand  possible  states. 

This  arrangement  allows  for  a  whole  host  of  new 
processor  instructions  and  actions  not  possible  with 
the  regular  6502.  To  begin  with,  page  zero  can  be 
located  virtually  anywhere  in  memory.  An  interesting 
possibility  which  results  in  putting  banks  of  page  zero's 
holding  data  throughout  large  programs.  Program 
speed  should  be  greatly  enhanced.  Of  course  if  page 
zero  is  to  be  portable,  the  stack  must  be  portable 
as  well.  Can  you  imagine  what  kind  of  Byzantine 
programs  you  could  write  jumping  from  stack  to 
stack?  Interrupts  are  handled  differently  in  the  Ill's 
processor  as  well.  An  added  command  is  the  equivalent 
of  interrupt  -  stand-by.  When  this  mode  is  enabled 
the  processor  recognizes  interrupts  but  takes  no  action. 
Instead  it  flags  the  fact  that  an  interrupt  must  be 
dealt  with  later.  This  allows  the  III  to  still  do  most 
everything  in  software  but  support  interrupts.  It's 
now  possible,  for  example,  to  simultaneously  enter 
text  to  the  keyboard  while  disk  access  is  going  on. 
The  processor  also  has  more  direct  control  over  I/O 
devices  than  has  previously  been  possible.  Scrolling  is 
possible  with  machine  commands.  Other  commands 
involve  enabling  and  disabling  the  ^programmable 
character  generator  and  keyboards.  Finally,  the  most 
obvious  benefit  of  the  processor's  enhanced  logic 
is  its  ability  to  address  128K  of  memory.  That's  the 
official  figure  at  least.  Reliable  sources  indicate 
that,  with  some  minor  modification,  the  III  is 
capable  of  handling  384K  of  memory  in  64K  chips. 
Whew! 
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Graphics  freaks  will  love  the  new  graphics  capa- 
bilities in  the  III.  At  maximum  resolution  the  screen 
has  a  560  x  180  dot  grid,  This  is  exactly  twice  the 
horizontal  resolution  of  the  Apple  II.  Unfortunately 
the  high  resolution  is  only  available  in  black  and 
white  (same  for  the  80  -  column  text).  But  lo-rcs 
will  blow  your  mind!  Lo-res  on  the  III  is  the  same 
resolution  as  hi-res  on  the  II.  But  unlike  hi-res 
on  the  II,  the  Ill's  graphics  allow  for  a  full  16 
colors,  any  of  which  can  be  mixed  at  will.  This 
contrasts  to  some  of  the  multi-color  machines  on  the 
market  now  which  only  allow  four  colors  to  be  on  the 
screen  at  a  time.  And  the  16  colors  are  available 
for  either  graphics  or  40  x  24  text.  Speaking  of 
text,  a  real  show-stopper  was  the  programmable 
character  generator.  As  you  might  expect,  this  allows 
the  user  to  set  up  his  own  character  set.  That's 
lots  of  fun  if  you're  into  Gothic  or  Chinese  (For 
some  reason  they  didn't  have  a  Pet  graphics  demo 
running.  .  .),  The  character  generator  is  even 
more  fun  if  you  like  animation.  By  changing  the 
definition  of  characters  you  can  easily  change  a 
character's  shape.  If  you  do  this  to  adjacent  charac- 
ters in  the  right  order  you  can  make  much  larger 
objects  move.  Andy  Hertzfeld  showed  a  couple  of 
outstanding  demos  of  birds  flying  and  horses  running. 
Just  like  the  movies.  Sound  from  the  III  is 
literally  in  the  6th  dimension.  The  speaker  is  run 
by  a  6-bit  d/a  converter  which  allows  true  wave- 
form generation.  Unfortunately  the  speaker  is  the 
same  crummy  one  found  in  the  II.  Apple  ran  a 
wire  to  a  jack  in  the  back  so  you  can  easily  plug 
in  an  amplifier  and  good  speaker.  Apple  expects  to 
market  a  12-bit  A/D  converter  as  a  peripheral 
card.  While  we  were  discussing  the  sound,  one  of 
Apple's  software  experts  noticed  that  the  six-bit 
d/a  converter  nicely  coincided  with  the  si.x-bit  data 
storage  on  the  disk.  Look  for  some  interesting 
sound  disks  to  come  along  soon. 

The  disk  drive  itself  is  pretty  much  the  same  as 
the  Disk  II  we're  already  used  to.  To  please  the 
FCC's  radio  emission  standards  a  change  has  been 
made  that  squelches  direct  compatability  with 
Disk  II  drives.  To  keep  radio  emission  down  you 
can't  have  a  million  cables  running  out  the  back  of 
the  computer.  So  the  disk  interface  was  changed 
such  that  disks  daisy-chain.  That  way  only  one 
cable  comes  out  of  the  computer,  for  the  second 
drive.  The  third  plugs  into  the  back  of  the  second, 
and  so  on  down  the  line.  After  hearing  this  several 
spectators  suggested  that  the  first  non-Apple  product 
for  the  III  will  be  conversion  kits  for  Disk  II's. 
Data  on  diskettes  will  be  compatible  between  the 
language  system  II  and  the  III. 

Apple  received  some  criticism  for  introducing  the 
III  with  only  143K  byte  drives.  They  apparently 
feel  that  this  won't  be  a  problem  in  early  applications. 
Even  more  tantalizing  is  their  elaboration  of  this  point: 
"We  will  also  expand  our  line  of  mass  storage 
peripherals  in  the  future,  since  some  applications  need 


several  megabyte  of  memory." 

No  system  would  be  complete  without  some  soft- 
ware to  make  it  work.  This  is  especially  important 
in  the  Apple  III,  where  all  kinds  cif  strange  tricks 
are  going  on  inside  the  processor.  In  anticipation  of 
this  problem  Apple  provides  the  Sophisticated 
Operating  System  (SOS)  for  the  III.  SOS  manages 
memory,  peripherals,  the  keyboard  and  screen, 
graphics  drawing,  and  interrupt  handling.  Most  utility 
functions  are  built  into  it.  Being  configurable,  SOS 
only  pulls  in  from  disk  those  parts  of  itself  needed 
for  the  tasks  at  hand.  With  most  programs  SOS  will 
take  up  about  14K  of  memory.  One  of  its  main  func- 
tions is  to  efficiently  manage  the  memory  that's 
left.  SOS  automatically  finds  and  allocates 
free  memory  for  program  use.  If  a  memory 
sensitive  function,  such  as  graphics,  is  switched  on, 
the  SOS  will  reallocate  memory  around  the  graphics 
page.  SOS's  other  main  function  is  to  handle  I/O. 
It  keeps  track  of  what  peripheral  card  is  in  what 
slot  and  has  built  in  programs  to  control  the  cards. 
Peripherals  can  be  interrupt  driven  for  maximum 
efficency,  SOS  also  has  built  in  routines  for  graphics 
and  sound.  SOS  thus  provides  a  foundation  for  higher 
level  languages.  The  user's  application  software  can 
be  truthfully  independent  of  the  hardware. 

Most  Apple  II  owners  will  be  interested  in 
compatability  between  their  computers  and  the  III. 
For  this  reason  the  III  comes  with  an  Apple  II 
emulator  mode.  The  emulator  mode  copies  the  II  as 
faithfully  as  possible.  It  allows  you  48K  of  RAM 
with  either  Applesoft  or  Integer  Basic  available 
in  "ROM".  Graphics  and  text  appear  as  on  the  II; 
6  color  hi-res,  lores,  and  uppercase  only  text.  The 
microprocessor  clock  even  slows  down  to  IMHz. 
Put  in  the  emulator  disk  and  it  effectively  performs 
a  frontal  lobotomy  on  the  III. 

Naturally  there  are  some  differences  between  the 
emulator  and  the  real  thing  due  to  hardware  differences. 
There  is  no  cassette  recorder  port,  for  instance. 
Game  paddles  will  need  adapter  sockets,  and  there 
are  no  annunciators.  There  are  no  slots  0,  5,  6,  or  7. 
The  emulator  supports  two  disk  drives  which  appear 
from  the  software's  viewpoint  to  be  in  slot  6,1 
and  6,2.  The  physical  dimensions  of  peripheral  cards 
in  the  III  are  different:  higher  and  shorter.  Your 
Mountain  Hardware  clock  and  Sup'R'Term  won't  fit 
in  the  III  -  but  you  won't  need  them  anyway.  Most 
other  peripheral  cards  for  the  II  should  work  in  the 
III  since  most  of  the  buss  lines  are  identical.  The 
III  uses  the  no-connects,  DMA,  and  Userl  lines 
for  its  own  purposes. 

Apple  has  made  a  full-scale  commitment  to 
continued  support  of  the  Apple  II.  Taylor  Pohlman, 
the  product  manager,  told  us  that  Apple  intends 
to  sell  as  many  Apple  II's  in  the  next  12  months 
as  have  already  been  sold  to  date.  Two  of  the  new 
languages,  Fortran  and  Pilot,  will  be  a\ailable 
for  the  II  before  they  are  available  for  the  III. 


Z-80  SoftCani. 
leading  a  Whole 
New  linetip  for 
Your  Apple  ll. 

Plug  the  new  Microsoft  Z-80  SoftCard  into  your 
Apple  II"-'  and  start  using  ail  of  the  system  and  application 
software  written  for  Z-80  based  computers.  Software  that 
you  could  never  use  before  on  your  Apple  ii. 

The  SoftCard  actually  contains  a  Z-80  processor  and 
lets  you  switch  between  the  Apple's  6502  and  the  Z-80  with 
simple  commands,  so  you  can  use  software  written  for 
either  processor. 

Starting  with  Two  Software  Standards.  Versatile 
CP/M;  the  most  widely  used  microcomputer  operating 
system  ever,  is  included  on  diskette  in  the  SoftCard 
package,  ready  to  run  on  your  Apple  II. 

You  get  Microsoft's  5.0  BASIC  too,  the  most  powerful 
version  to  date  of  our  famous  BASIC  interpreter. 

PRINT  USING,  16-digit  precision,  CALL,  and  CHAIN 
and  COMMON  are  just  some  of  the  major  BASIC  features 
you'll  add.  Applesoft's  graphics  extensions  are  still  included. 

More  Power  Down  the  Line.  You  can  get  even  more 
programming  power  and  versatility  by  adding  Microsoft's 
FORTRAN,  COBOL,  BASIC  Compiler  and  Assembly 
Language  Development  System.  All  are  available 
separately  to  run  with  the  SoftCard  system. 

And  the  whole  host  of  CP/M-based  business,  scientific 
and  educational  applications  can  be  easily  transferred  to 
your  Apple  with  SoftCard. 

The  Microsoft  Z-80  SoftCard  is  compatible  with  most 
every  Apple  product  from  the  Apple  II  to  the  Apple  II  Plus. 
Language  Card  and  peripherals.  Independent  peripherals 
for  the  Apple  are  supported-as  well.  The  SoftCard  package 
requires  a  system  with  48K  and  a  disk  drive. 

Line  up  a  SoftCard  demonstration  at  your  Microsoft 
Consumer  Products  dealer  today  They  II  be  glad  to  show 
you  how  the  Z-80  SoftCard  and  your  Apple  computer 
combine  to  form  a  system  that  can't  be  beat  for  either 
practicality  or  pure  pleasure  by  any  personal  computer 
available  today  Or  give  us  a  call,  206/454-1315,  for 
more  information. 

But  act  quickly.  At  the  low  price  of  S349  for  SoftCard. 
CP/M,  Microsoft  BASIC  and  complete  documentation,  you 
may  have  to  stand  in  line  to  get  one! 


"■'Apple  Ills  a  trademark  of  Apple  Computer,  Inc. 
CP/M  is  a  registered  trademark  of  Digital  Research. 


/HiG^psofr 

r  CONSUMER^  products" 

10800  Northeast  Eighth,  Suite  507 
Bellevue,  WA  98004 
(206)454-1315 
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And  Apple  intends  to  release  sometime  this  summer 
a  Pascal  interpreter  that  will  run  in  a  48K  Apple  II 
with  no  Language  System.  Thus  all  Apple  owners 
will  be  able  to  run  compiled  P-code.  Apple  sees  the 
II  as  a  beginner's  system  and  as  a  basic  workhorse 
for  small  applications. 

Apple's  introduction  of  their  own  new  computer 
was  done  in  the  Grand  Style.  NCC  is  a  very  political 
convention,  where  pecking  orders  and  pull  count 
heavily  for  floor  space  and  location.  Both  are 
important,  since  in  excess  oi  80,000  people  attend 
the  convention.  As  you  might  expect,  NCC  wanted 
to  put  Apple  in  the  personal  computing  section. 
Apple,  on  the  other  hand,  wanted  to  insist  that  the  III 
was  a  small  business  comupter.  The  haggling  went  on 
long  enough  thai  Apple  finally  wound  up  as  neither; 
they  were  put  in  the  "overllow"  section  in  the 
basement  garage  of  the  Disneyland  Hotel.  The  garage 
was  over  a  mile  from  the  main  convention  floors. 
Apple  wasn't  even  listed  in  the  convention's  guide  to 
exhibitors.  Nevertheless  the  Apple  booth  was  the 
second  -  most  popular  booth  at  the  show;  only 
IBM  drew  a  bigger  crowd.  At  Apple's  booth  one  had 
to  stand  in  line  20  minutes  just  to  get  near  a 
machine!  By  the  show's  third  day  officials  had  grown 
so  tired  of  "Where's  Apple?"  questions  that  10 
signs  were  up  on  the  main  convention  floor  giving 
instructions  on  how  to  get  over  to  Apple.  So  much 
for  politics. 

Several  interesting  products  were  introduced  for 
the  Apple  II  by  other  manufacturers  at  NCC  '80. 
Mountain  Hardware  announced  their  new  music 
board.  Actually,  it's  two  boards  and  a  light  pen. 
The  boards  allow  16  voice  music  synthesis,  with 
each  voice  having  a  fully  programmable  waveform 
and  envelope.  Software  included  allows  input  of  sheet 
music  in  standard  notation  using  the  Apple's 
graphics  screen  and  the  light  pen.  Output  is  in 
stereo,  naturally,  and  sounds  excellent.  The  complete 
system  will  be  priced  at  $545.  Mountain  Hard- 
ware also  had  a  bit  of  information  on  their  Apple 
buss  expansion  module.  Contrary  to  ads  you  may  have 
read,  the  expansion  box  won't  be  ready  for  at  least 
4  months.  It  will  have  its  own  power  supply, 
a  switching  supply  slightly  greater  than  Apple's 
(my  sources  indicate  that  this  supply  is  manufactured 
in  the  Far  East  and  is  difficult  to  get  in  large 
quantities).  The  box  will  have  9  slots,  one  to  re- 
place the  slot  which  the  box  plugs  into  and  eight 
more  (0'-7').  It  employs  the  User!  line  to  disable 
the  boards  on  the  Apple  itself  when  appropriate, 
PR#14! 

Programraa  showed  the  prototype  of  their  dual 
sided  8"  disk  controller.  It's  a  neat  board,  absolutely 
crammed  with  chips.  To  overcome  power  supply 
limitations,  the  controller  card  gets  all  its  power 
from  the  disk  drives.  That  should  be  ready  in 
about  6  months.  Programma  also  showed  their  new 
text  editor,  PIE  2.0.  It  does  almost  everything 
you  can  imagine  (I  didn't  find  out  if  it  works  with 


LISA).  One  of  it's  nice  features  is  footnoting. 
Unfortunately,  for  some  reason  it's  still  a  line- 
oriented  editor.  Oh  well,  it's  probably  the  best 
line-oriented  editor  you'll  ever  see. 

Stoneware  Computer  Products  was  demonstrating 
the  prototype  of  their  Data  Base  Management 
System.  It  is  indexed  so  that  any  data  can  be  found 
in  6  seconds.  Each  entry  can  be  up  to  IK  long, 
and  have  up  to  100  fields.  Data  types  can  be 
defined,  and  the  user  has  complete  control  over 
report  generation.  The  system  has  been  elegantly 
human  engineered  to  be  useable  by  the  non-pro- 
grammer. A  first  version  will  be  released  this 
summer  which  will  support  one  disk  full  of  data. 
The  second  version,  which  will  soon  follow,  will 
support  U]3  to  25  megabytes  and  have  many  other 
features. 

Epson  America  introduced  a  new  printer  for  the 
hobbyi.st  and  small  business  market.  Called  the  TX-80, 
it's  an  80-column  dot-matrix  impact  printer  with 
either  tractor  or  friction  feeds.  The  printer  comes 
with  a  Centronics  -  type  parallel  port  and  options 
for  RS-232  serial  or  IEEE  488  interfaces.  L  prints 
at  125cps.  Epson  designed  the  printer  with  high 
reliability  and  ease  of  use  in  mind.  The  ribbon 
comes  on  standard  typewriter  spools,  for  instance. 
Of  the  thousands  of  TX-80's  sold  in  Europe,  less 
than  1%  needed  .service  of  any  kind.  Of  course  the 
added  quality  costs:  the  printer  is  expected  to  sell 
in  the  $750  range  when  marketing  begins  in  this 
country.  © 


TRAP 

65 


For  PET,  APPLE,  SYM,  OSI.  etc. 
Any  1  mhz  6502! 


—  Prevents  from  "hanging  up"  via  execution 
of  unimplemented  opcodes!  Causes  your 
monitor  to  display  iocation  of  bad  op  code! 

—  Our  computers  have  stopped  crashing! 

—  Debugging  easier! 

—  Easy  to  install  —  plugs  into  6502'.s  socket. 

TRAP  65  is  currently  being  used  to  insure  that 
there  are  no  bad  opcodes  in  programs  before 

submittal  for  ROM  masks! 

We  are  using  TRAP  65  in  experiments  on 
extending  the  6502's  instruction  set  —  PHX, 
PHY,  INCD. 

$149.95  (Add  $4.00  postage,  $10.00  foreign) 

Phone  19191  748-S-14G  or  924-28Sa 

Eastern  House  Software 
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Exciting,  entertaining  software  for  the  Apple  II  and  Apple  II  Plus* 


/         / 


II  you  liked  "Invaders",  /ou'll  love  ASTEROIDS  IN  SPACE  by  8ruce  Wallace,  Vour  space  ship  is  Iraveling  in  the  miclJle  of  3  showerol  asteroids.  Blast  Ihe  asteroids 
with  lasers,  but  beware  —  big  asteroids  fragment  into  small  asteroids!  The  Apple  game  paddles  allow  you  lo  rotate  your  space  ship,  fire  its  laser  gun.  and  give  it 
thrusi  to  propel  it  through  endless  space  From  time  to  time  you  will  encounter  an  alien  spaceship  whose  mission  is  lo  destroy  you.  so  you'd  better  destroy  it  first! 
High  resolution  graphics  and  sound  effects  add  lo  the  arcade-like  excitement  thai  this  program  generates.  Runs  on  any  Apple  II  with  at  least  32K  and  one 
disk  drive.  On  diskette  —  $19.95 


FRACAS"  by  Stuart  Smilh  A  fantastic  adventure  janie  like  no  other 
—  up  lo  ei.ijhl  players  can  participate  in  FRACAS  al  the  same  time 
Journey  in  the  land  ol  FAROPH.  searching  for  hidden  Ireasure  while 
warding  off  all  sorts  of  unfriendly  and  dangerous  creatures  like  the 
Ten  Foot  Spider  and  the  Headless  Horseman.  You  and  your  friends 
can  compete  witli  each  other  or  you  can  |oin  forces  and  gang  up  on 
the  monsters  Your  location  is  presented  graphically  and  sound 
effects  enliven  tfie  battles.  Save  your  adventure  on  diskette  or 
casselle  and  continue  it  at  some  other  lime.  Requires  at  least  32K 
of  RAM  Cassette  S19.95        Diskette  S24.95 


BATTlESHtP  COMMANDER'"  by  Erik  Kilk  and  Ivlatlhew  Jev.  A  game 
of  strategy  You  and  the  computer  each  start  out  by  positioning  five 
ships  of  different  sizes  on  a  ten  by  ten  grid  Then  Ihe  shoolmg  starts 
Place  your  volleys  skillfully  —  a  combination  of  logic  and  luck  are 
required  to  beat  the  computer  Cartoons  show  the  ships  sinking  and 
announce  Ihe  winner.  Sound  ellects  and  flashing  lights  also  add  lo 
the  en]oyment  of  the  game  Requires  at  least  32K  ol  RAfyl 
Cassette:  Si4.95        Diskette:  S24,95 


OKlllTVhli;)     (LVOKil'tjV^ 


FASTGAMMON'"  by  Bob  Christiansen, 
Sound,  ht  res  color,  and  cartoons  have 
helped  maked  Ihis  the  most  popular 
backgammon-playing  game  for  Ihe 
Apple  II  But  don't  let  these  enlerlaining 
fealuies  lool  you  —  FASTGAftiri/ION 
plays  serious  backgammon.  Requires  at 
least  24K  ol  RAM 
Cassette:  S19.95        Diskette:  S24.95 


■■'Aflple    H"    and    'Applp    II    Plus'     irr 
trademarks    ot    Apple    Compuler.    Inc 


QUTiLrry  softw7ir€ 

6660  Reseda  Blvd.,  Suite  105,  Reseda.  CA  91335 

Wfl  ERE  TO  GET  IT:  Call  us  al  (213)  344-6599  lor  tfie  name  of  the  Quality  Software  dealer  nearest  you.  If  necessary,  you 
may  order  directly  from  us  MasterCharge  and  Visa  cardholders  may  place  orders  by  telephone  and  we  will  deduct  $1 
Irom  orders  over  S 19  to  compensate  for  phone  charges.  Or  mail  youi  order  lo  the  address  above  California  residents  add 
6'  sales  tax  SHIPPING  CHARGES:  Within  North  America  orders  must  include  Sl-50  for  firstclass  shipping  and  handling. 
Outside  North  America  the  charge  for  airmail  shipping  and  handling  is  $5.00  —  payable  in  US.  currency 
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APPLE  WRITER 

A  Review  Of 
The  Text  Editing 
System  From  Apple 
Computer,  Inc. 

David  D.  Thornburg 

Innovision 

P.O.  Box  1317 

Los  Altos,  CA  94022 

The  use  of  personal  computers  in  small  businesses 
is  clearly  bringing  tremendous  sophistication  to  tasks 
which  a  few  short  years  ago  weix'  being  carried  out 
manually.  To  take  just  one  example  from  the  data 
processing  (DP)  world,  the  Apple  II  is  being  used 
along  with  Personal  Software's  Visicak:  program  for 
numerous  data  processing  applications  in  thousands 
of  businesses. 

In  addition  to  data  processing,  all  businesses 
(and  homes  for  that  matter)  generate  documents 
which  have  to  be  sent  to  others  in  the  form  of 
letters,  reports,  or  memoranda.  The  creation  of  these 
documents  is  aided  by  "Word  Processing"  (WP) 
software.  It  is  reasonable  to  expect  the  computer 
that  handles  the  data  processing  (DP)  tasks  to  handle 
the  WP  tasks  as  well,  since  the  primary  ingredient 
for  doing  the  job  is  software.  There  are  some  hard- 
ware constraints,  as  we  will  see,  which  can  make  a 
good  DP  computer  less  than  perfect  for  WP  applica- 
tions, but  it  is  still  the  software  which  carries 
99%  of  the  load. 

Since  Innovision  uses  a  48K  Apple  II  for  us 
business  applications,  I  was  only  too  happy  to  get 
my  hands  on  the  Apple  text  editing  system,  "Apple 
Writer",  when  it  was  released  several  months  ago. 
This  text  editing  system  comes  with  two  disks  (one 
for  back-up)  and  a  manual  which  continues  the  fme 
tradition  of  Apple  in  that  the  documentation  is 
superb.  Since  this  package  was  priced  inexpensively 
at  $75,  I  did  not  expect  to  have  all  the  features 
one  expects  from  a  SI 6,000  dedicated  word  processor. 
What  I  did  find  was  a  compact  text  editing  system 
with  a  lot  of  the  essential  features  needed  for  the 
rapid  preparation  of  letters  and  small  (under  100 
page)  reports. 

HARDWARE  CONSTRAINTS  PROVE 
CHALLENGING.  .  . 

If  you  are  an  Apple  owner,  you  may  have  run  up 
against  two  Apple  characteristics  which  might  make 
you  skeptical  of  this  machine's  ability  to  be  used 


for  document  creation.  These  characteristics  are  the 
lack  of  lower  case  character  entry  from  (he  keyboard,. 
and  the  inability  of  an  unmodiHed  Ap]>le  II  to  dis- 
play lower  case  characters  on  the  screen.  These 
constraints,  coupled  with  the  limitations  of  a  forty 
character  by  twenty-five  line  display,  might  make  one 
shudder  to  think  of  doing  text  editing  on  such  a 
machine.  My  experience  suggests  that  things  aren't 
as  bad  as  they  might  first  appear  -  and  I  use  this 
system  Ibr  text  editing  every  day  of  the  week. 

Apple  uses  its  own  convention  for  character 
presentation  on  the  screen.  Upper  case  letters  are 
shown  in  reverse  field  (black  on  white)  and  lower 
case  letters  are  shown  as  normal  (white  on  black) 
upper  case  letters.. The  keyboard  is  handled  in  the 
following  manner.  Ail  alphabet  keys  are  accepted 
as  lower  case  letters.  Upper  case  letters  are  obtained 
by  preceding  a  letter  with  the  ESC  key.  Since  the 
ESC  key  is  located  in  the  same  column  as  the  SHIFT 
key,  this  doesn't  cause  too  much  trouble.  Normally 
shifted  characters  (the  punctuation  marks  above  the 
numerals,  for  example)  are  obtained  with  the  SHIFT 
key.  As  characters  arc  entered  into  the  computer, 
they  are  displayed  on  the  screen  just  as  they  are 
typed  in.  This  means  that  words  will  be  broken  at 
line  boundaries  (40th  character  position).  Thus  making 
it  hard  to  do  cxtensi\'e  proofreading  from  the  screen. 
Since  the  goal  is  to  produce  printed  documents, 
this  is  not  a  terrible  inconvenience,  as  I  am  willing 
to  perform  proofreading  tasks  on  the  printed  output. 

Please  note  that  while  I  find  the  constraints 
imposed  by  the  Apple  hardware  tolerable  for  this 
application,  I  am  not  suggesting  that  they  could  not 
be  improved.  In  fact,  I  think  that  all  personal 
computers  should  have  full  upper  and  lower  case 
keyboards  and  displays.  What  I  am  saying  is  that, 
given  the  constraints  imposed  by  the  hardware,  the 
Apple  Writer  word  processing  system  is  easy  to  learn 
and  use. 

BRINGING  THE  SYSTEM  UP  .  .  . 
If  you  have  Applesoft  and  an  auto-start  ROM, 
the  Apple  Writer  is  virtually  crash-proof.  Accidental 
pressing  of  the  RESET  key,  for  example,  does  nothing 
more  serious  than  moving  you  to  the  menu.  Note, 
however,  that  this  is  not  true  unless  you  have 
the  auto-start  ROM  and  Applesoft  BASIC,  and  that 
it  is  a  bad  practice  to  return  to  the  menu  this 
way.  If  the  system  is  brought  up  with  the  disk  in 
place,  the  user  is  automatically  presented  with  a 
menu  of  commands.  The  commands  allow  one  to 
create  a  new  document,  bring  in  an  existing  document 
from  the  disk,  save  a  document  on  the  disk,  and 
bring  up  the  printer  program  (which  will  be  discussed 
later).  The  "Edit"  command  clears  the  menu 
window  and  places  the  document  to  be  edited  on  the 
screen. 

Since  it  is  important  to  be  able  to  move  the  cursor 
around  on  the  screen  to  edit  various  portions  of  a  docu- 
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mcnt  as  well  as  to  bring  new  portions  of  tlie  docu- 
ment into  view,  text  editing  systems  need  some 
method  fur  cursor  control.  Apple  Writer  lets  the  user 
move  between  text  entry  and  cursor  control  modes 
by  use  of  the  ESC  key.  If  the  ESC  key  is  pressed 
once,  the  cursor  becomes  a  carat  {      ).  This  symbol 
indicates  that  the  next  typed  letter  will  be  printed 
in  upper  case.  If  the  ESC  key  is  pressed  twice  in 
succession,  the  cursor  becomes  a  plus  sign  (  +) 
which  indicates  that  the  system  is  now  in  the  cursor 
control  mode.  The  cursor  can  be  moved  anywhere 
on  the  screen  using  the  I,  J,  K,  and  M  keys  to  move 
the  cursor  up,  left,  right,  or  down  respectively.  Once 
the  cursor  is  in  the  desired  place,  the  text  entry 
mode  can  be  entered  by  pressing  any  of  the  other 
alphanumeric  keys.  A  little  practice  makes  this  seem 
quite  natural. 

Large  scale  cursor  motion  is  available  from  several 
control  functions.  CTRL  B,  for  example,  moves  the 
cursor  to  the  beginning  of  the  document. 

The  deletion  of  unwanted  text  can  be  carried 
out  on  a  character-by-character  basis,  as  well  as 
by  word,  or  by  paragraph.  These  capabilities  are  easy 
to  master.  As  characters  arc  deleted  they  are  stored 
in  a  255  character  buffer  so  that  they  can  be 
re-entered  later  if  desired.  The  easy  way  to  move  a 
word,  for  example,  is  to  delete  it  from  its  old  position 
with  the  back  arrow  key  (<-)  and  to  then  move  the 
cursor  to  the  location  at  which  the  word  is  to  be 
entered.  Once  this  has  been  done,  the  word  may  be 


entered  with  the  forward  arrow  (->")  key. 

More  sophisticated  editing  tasks,  such  as  search 
and  replace,  file  insertion,  and  others,  are  also 
implemented  in  Apple  Writer. 

In  addition  to  the  documentation  provided  in  the 
70  ]3age  manual  accompanying  the  software,  Apple 
also  provides  an  on-line  tutorial  to  bring  you  up  to 
speed  with  "hands-on"  practice.  All  in  all,  this  is  a 
fine  text  editor  for  simple  document  creation. 

Since  the  keystrokes  are  only  saved  on  the  disk 
as  a  result  of  your  formal  request  to  that  effect, 
I  find  it  useful  to  save  my  documents  every  fifteen 
minutes  or  so,  just  in  case  the  power  goes  out.  The 
user  can  find  the  amount  of  space  remaining  in  free 
memory  by  typing  CTRL  F.  With  a  48  K  Apple,  one 
should  be  able  to  create  about  sixteen  pages  of 
text  in  one  file. 

GETTING  IT  PRINTED  .  .  . 
Sooner  or  later,  you  will  want  to  take  the  jumble 
of  broken  words  which  appear  on  the  screen  and  turn 
them  into  a  nicely  formatted  document.  During 
the  document  creation  process  you  can  enter  non- 
printing commands  (which  do  appear  on  the  display) 
to  let  the  printer  do  some  fancy  stuff  like  centering, 
fill  justification,  etc,  The.se  commands  occupy  one  line 
each  and  arc  preceded  by  an  exclamation  point.  For 
example, 

is  a  command  to  tell  the  printer  to  center  all  the 
text  which  follows.  Since  each  command  stays  active 


ACCOUNTING   SOFTWARE    FOR   YOU 


t;KNKRAl.  LKIXiKR 

If  yoit  are  a  business  |X-is()n  wtm  is  l(H)liiiij'  for  ullimate 
pcrforinante,  lake  a  loiik  ui  ihts  outstaiuiiiig  General 
Ledger  package  Ironi  Small  Business  Computer  Syslems. 

Our  package  features  six  digit  aicuunt  numbers,  plus 
ihiriy-one  character  account  names.  We  have  ten  levels  of 
subtotals,  giving  you  a  more  detailed  income  statement 
and  balance  sheet  with  up  to  nine  departments,  hither 
cash  or  accrual  arcuuniing  methods  may  be  used.  The 
cash  journal  allows  a  ibirly-three  character  transaclioii 
description  and  automatically  calculaie.s  the  proper  off- 
setting entry.  You  may  print  the  balance  sheet  and  income 
statement  for  the  current  month,  tjuarter,  or  any  of  the 
previous  three  (juarters,  Also,  this  year's  or  last  year's 
total  are  includetl  on  the  income  statement,  depending  on 
the  current  month. 

There  is  virtually  no  limit  on  entries,  since  you  may 
process  them  as  often  as  you  like.  Two  thousand  (1,000 
from  G/L,  1,000  from  any  external  source)  can  be  pro- 
cessed in  one  session. 


AGCOIJNTS  RKGF.IVABI.K 

Sound  busitiess  managemeiU  retjuires  you  to  kee)) 
up-to-date  re])orts  regarding  the  statu::  of  your  aciounts 
reteivablc. 

Now,  from  the  same  company  that  revolutioni«-d  ac- 
counting on  the  Apple  II  computer,  with  their  conversion 
of  the  Osb(.)nie/McGraw-Hill  General  Ledger  program, 
you  may  now  obtain  the  Accounts  Receivable  package  you 
have  l)een  waiting  for. 

Our  patkage  allows  you  to  assigti  your  own  atpha- 
nimieric  customer  code  upi  to  six  characters.  Date  of  the 
last  activity,  as  well  as  amounts  billed  this  year  aiici  last 
year  arc  maintained.  This  Accounts  Receivable  system 
niaintaiiis  six  tligil  invoiie  numbers,  six  digit  job  numbers, 
invoice  amount,  shipping  charges,  sales  tax  (automatically 
calcul.ited),  total  paymeius  as  v^ell  as  progress  billing  in- 
formation. You  may  enter  an  invoice  at  any  time;  liefore 
it's  ready  for  billing,  after  you  have  billed  it,  and  even 
after  it's  paid.  This  package  also  prints  reports  which  list 
the  invoices  you  have  not  billed  yet,  open  items,  paid 


Items,  and  an  aging  analysis  of  open  items. 

In  the  final  analysis,  making  your  bookkeeping  easier  is  what  our  software  is  all  alioiit.  With  our  General  Ledger  package 
you  can  formal  your  own  balance  sheet  and  income  siaiemetu.  Department  financial  statements  may  be  formated 
differently.  You  have  complete  freedom  to  place  titles  and  headings  where  you  want  litem,  skip  lines  or  [)ages  Ix'tween 
accounts  and  generate  subtotals  and  totals  throughout  the  reports  —  up  to  ten  levels  if  you  need  them.  Accounts 
Receivable  is  designed  to  provide  you  with  complete  up-to-date  information.  The  program  will  print  customer  statements 
as  well  as  post  invoice  amounts  to  any  of  the  accounts  tnainiaincd  by  our  Genera!  Ledger  package.  These  packages  will 
suppc>rt  any  printer/interface  combination.  General  Ledger  rec)uires  one  hundred  ten  coluiims.  Accounts  Receivable 
recjuires  one  hundred  thirty  columns. 

c  ,„        ,  SMAIiBUSlNtSSCOMPUTtR  SYSTEMS 

SuKKC5l«l  Kctail:  AXAnr-  j  .      -,   .  ,     r  ... 

1  ..dividuilly } 1 80.00  .  :_  _^J*°J?';"''r"^„-,. .  ^■^'.'^''''  f^"'"  >'"^'J."^='  Applf 

Together J330.00 


Lincoln,  Nrbra$L;4  68504 
(402)467-1878 
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until  superceded  by  another  one,  it  is  easy  to  enter 
text  in  the  midst  of  a  long  document  without  worrying 
about  how  it  will  be  formatted. 

Once  the  document  is  to  be  printed,  one  enters 
the  print  mode  from  the  editor  menu.  At  this  point, 
one  gets  a  print  menu  which  includes  the  functions 
Print  and  Continue.  If  the  Print  function  is  selected, 
a  list  of  default  printer  settings  is  displayed  on 
the  screen  (left  and  right  margins,  lines  per  page, 
interline  spacing,  etc.).  The  user  has  the  option  of 
changing  any  of  these  parameters,  in  which  case  the 
parameter  set  is  stored  on  the  disk  and  becomes  the 
new  default.  This  feature  is  quite  valuable,  since 
there  are  likely  to  be  few  changes  in  overall  document 
format  once  your  printer  is  set  up  the  way  you  like  it. 

Once  the  printer  parametcts  are  set,  the  user  is 
given  the  option  oi'  enleiing  a  page  heading  which 
appears  on  each  page  of  the  document.  Finally,  the 
printer  springs  to  life  and  the  document  gets  put 
on  paper  for  all  to  see. 

Large  documents  which  rec[uire  more  than  one  file 
to  hold  them  can  tie  printed  with  no  trouble  at  all 
by  using  the  Continue  command  from  the  Prim 
program  menu.  A  file  can  end  in  mid  sentence, 
in  which  case  the  remainder  of  the  text  can  be 
loaded  into  the  computer  and  the  printing  resumed 
with  no  problem  whatsoever.  The  only  problem  with 
printing  large  documents  is  that  the  process  requires 
lots  of  operator  interaction.  This  becomes  especially 
noticeable  if  several  copies  of  a  multiple  file  docu- 
ment are  being  printed. 

We  have  used  Apple  Writer  with  a  Qume  daisy 
wheel  printer  and  with  the  Comprint  electrosensitive 
printer  connected  to  the  Apple  parallel  interface 
card.  In  both  cases  the  documents  turn  out  beauti- 
fully, although  I  think  there  is  a  small  bug  in 
Apple  Writer  which  makes  it  a  little  tricky  to  use 
the  Comprint  printer  in  the  single  page  mode. 

As  you  may  know,  the  Comprint  printer  uses 
roll  paper.  If  you  want  to  print  documents  one 
page  at  a  time  (so  that  you  can  easily  tear  them  off 
at  11  inch  lengths),  you  must  use  the  "single 
page"  mode  during  printing.  When  this  is  selected, 
there  is  an  extra  line  feed  command  sent  just 
prior  to  printing  the  first  page.  Unless  the  u.ser 
anticipates  this  and  puts  the  printer  in  the  "no- 
print"  mode  just  prior  to  printing  the  first  page, 
the  resulting  document  will  be  improperly  spaced. 

Given  that  this  product  has  only  recently  been 
placed  on  the  market,  I  am  happy  that  this  is  the 
only  "bug"  I  have  uncovered  to  date. 

AND  IN  CLOSING 

I  have  looked  at  other  text  editors  for  the  Apple, 
some  of  which  were  overloaded  with  features.  Given 
the  hardware  limitations  of  the  Apple  II,  I  feel  that 
Apple  Writer  is  a  very  useful  document  creation  tool. 
After  ail,  how  do  you  think  this  manuscript  was 
created?  ® 


GIVE  YOUR  APPLE 
A  BYTE  OF  THIS .  . . 

GPA  ELECTRONICS' 

Programmable, 
Intelligent  I/O. 
More  than  a 
telecommunications 
I/O.  More  than  an 
intelligent  hard  copy 
interface.  GPA's 
Intelligent  I/O  is  a 
COMPLETE 
MICROCOMPUTER 
on  a  41/2  "x7  "card! 

Completely  programmable  via  Resident  Monitor  in 
PROM,  the  InteHigenl  I/O  lets  you 

select  the  operation  you  desire, 
then  helps  you  complete  the  task. 

FEATURES: 

■*•    6502  Microprocessor. 

•  2K  E-PROM;  IK  RAM  as  bulTcr. 

•  Serial  and  parallel  I/O  through  four  ports.  Device  can 
cominunicate  with  two  peripherals  simultaneously; 
RS-232  devices  can  communicate  with  parallel 
devices, 

•  Hard  copy  interfacing  with  cither  RS-232  or  20mA 
devices  (Please  specify.) 

•  Accommodates  all  baud  rates  to  9600. 

•  Selectable  line  feed,  carriage  return  delay  and  char- 
acters per  line. 

•  Supports  standard  EIA  modem-control  signals. 

•  Handshaking,  of  course. 

•  Functions  as  Data  Channel,  SPOOLER  or  Program- 
mable Filter. 

■*■    Remote  access  to  Basic. 
■A-     Fully  disk  compatible. 

•  Will  provide  secure,  encrypted  telecommunications 
vvitli  optional  programming. 

■*•     Complete  dial-up  and  lime  sharing  rimctions. 
■*•    Allows    ganging    of    microcomputers     for    multi- 
processing. 

•  Accesses  and  controls  servos,  sensors,  articulated 
devices  or  transducers  (with  appropriate  firmware, 
available  from  GPA.) 

•  Functions  as  disk  controller,  resident  assembler, 
E-PROM  burner  (with  optional  firmware.) 

•  Integral  power  supply  (5VDC  @  350niA.)  Completely 
portable,  stand-alone  computer. 

*•     Fully  documented,  tested  and  guaranteed. 

See  your  dealer  today,  or  order  direct  from  GPA. 
Just  $299.95  (llOVAC  )  or  $320.95  (250VAC) 
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Apple  1 1  Rom 

Card  Documentation 


Jeff  Schmoyer 

Andromeda 

Computer 

Systems 


The  only  schematic  that  has  not  been  made  available 
by  Apple  (that  I  know  of)  is  for  their  ROM  card. 
The  reason  for  the  presentation  at  this  time  is  not 
out  of  looking  for  something  to  do,  but  to  obtain  the 
solution  to  my  blowing  out  the  card  for  the  third 
time.  In  each  case  the  computer  acted  the  same, 
coming  up  with  the  screen  full  of  junk  in  the  Lores 
graphics  mode  with  RESET  having  no  effect.  Each 
time  removing  the  ROM  card  alleviated  the  problem. 

Also  in  every  case  the  perpetrator  was  found  to 
be  the  74LS09  that  provides  the  inhibiting  of  the 
main  board  ROMs  and  the  output  enable  for  the 
data  buffer  on  the  card.  Apparently  this  chip  inhibits 
the  main  board  ROMs  while  not  enabling  its  own 
ROMs.  The  processor  can't  find  anything  to  execute 
so  it  hangs  up.  Replacement  of  this  chip  restored 
the  system  to  its  normal  operation  every  time. 

While  we're  here  I  might  as  well  explain  how  the 
board  works  and  about  the  two  options  present  on  it. 

The  74LS74  flip-flop  on  the  card  determines 
whether  the  on-board  or  off-board  ROMs  will  be 
used.  When  RESET  comes  through  the  system,  the 
flip-flop  is  either  preset  or  cleared  depending  on 
the  position  of  the  switch  on  the  back.  The  other 
way  of  activating  the  flip-flop  is  through  the  use  of 
Device  Select.  The  low  order  address  bit,  AO, 
determines  whether  to  set  or  reset  it  in  conjuction 
with  a  C08X  access. 

The  74LSI38  IC  decodes  the  high  order  address 


lines,  with  enables  also  coming  from  01  and  R/W, 
to  provide  output  enable  to  the  proper  ROM.  If 
any  of  the  ROMs  are  enabled,  the  74LS09  activates 
the  INH  line  to  inhibit  the  mam  board  ROMs,  and 
it  enables  the  74LS244  output  data  buffers. 

Another  service  the  card  performs  is  the  daisy 
chaining  of  the  DMA  line  through  it. 

On  to  the  option  jumpers.  One  of  the  jumpers 
on  the  board  permits  the  use  of  a  ROM  in  the 
F8  position.  This  jumper  is  labeled  F8  and  is 
located  near  the  74LS138.  If  a  blob  of  solder  is 
melted  across  it,  this  position  will  be  used  whenever 
the  card  is  selected.  This  could  contain  an  Auto- 
start ROM  if  a  standard  monitor  is  on  the  main 
board,  or  it  could  contain  the  old  monitor  for  an 
Apple  II  Plus. 

The  other  two  jumpers,  which  are  located  in  the 
upper  right  corner  of  the  card,  select  whether  you 
want  to  use  2716  (programmable  ROMs)  or  the  usual 
2316  (Apple  ROMs)  chips  on  the  card.  If  both  of 
them  are  jumpered,  2716's  may  be  used.  Both  kinds 
of  chips  can  not  be  used  at  the  same  time.  Please  notice 
that  on  the  schematic,  2716  notation  is  used  for  the 
ROMs. 

One  final  note.  On  at  least  one  of  the  occasions 
the  74LS09  blew  out,  nothing  was  done  to  the  compu- 
ter other  than  picking  the  whole  thing  up  and  moving 
it  as  a  unit.  So  don't  assume  someone  pulled  out  a 
board  with  the  power  on.  (I  did  that  the  last  time!) 
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Review: 


DDT  (DISC  DRIVE  TIMER) 


Morton  Technologiesjnc.    $19,95     P,0.  Box  11129    Santa  Rosa,  CA  95406 

Reviewed  By: 

Terry  N,  Taylor,  Apple  Pi,  Denver,  CO 


Most  of  us  have  seen  Disco-Tech's  ads  on  their 
drive  timer  for  the  Apple,  and  most  ol  us  have 
asked  why  we  should  purchase  this  product  when  a 
perfectly  good  pubUc-domain  program  called  DSPEED 
is  already  available.  The  answer  is  simple:  The  pro- 
gram is  good  and  the  documentation  is  extellent-- 
a  24-page  booklet  that  covers  the  following  topics: 

1 .  Introduction 

2.  Running  the  Apple  DDT  Program 

3.  Adjusting  Disc  Drive  Motor  Speed 

4.  Care  of  Magnetic  Media 

This  documentation  alone  justifies  the  price  of  $19.95 
for  the  package.  There  have  been  several  articles  in 
the  Apple  user  group  newsletters  on  how  to  adjust  your 
drive's  speed  with  only  two  screwdrivers  and 
DSPEED,  but  they  are  not  generally  available.  In 
addition,  this  booklet  does  a  far  better  job  than  do  the 
articles. 

OK,  so  the  documentation  is  better;  how  about 
the  program?  It's  better  too.  I  have  lost  count  of 
the  number  of  times  that  I  have  made  additional 
copies  of  DSPEED  for  those  who  have  forgotten  to 
put  a  blank  diskette  in  the  disc  drive  and  thus  ruined 
the  program.  You  don't  need  to  worry  about  changing 
diskettes  with  DDT.  This  program  offers  two  major 
options.  First,  it  allows  the  user  to  analyze  the  motor 
speed  of  the  disc  drive  in  question.  It  displays  both 
the  motor  speed  in  revolutions  per  minute  and  the 
percentage  of  error  (from  300  rpm,  which  they  say  is 
the  correct  speed)  for  the  disc  drive.  DDT  averages 
the  disc  speed  over  40  resolutions,  taking  about  12 
seconds  to  present  the  analysis. 

The  second  major  option  updates  the  motor  speed 
about  once  per  second  and  graphically  displays  the 
results.  Since  the  program  a.sks  you  for  an  rpm  range, 
you  are  able  to  adjust  the  disc  motor  speed  very 
accurately,  from  a  large-scale  spread  down  to  a  very 
small  dispersion,  which  watching  your  video  screen. 

To  adjust  my  three  disc  drives,  with  either  pro- 
gram, took  less  than  20  minutes  using  only  two 
screwdrivers  (one  of  which  should  be  a  Phillips), 
so  this  is  not  a  complicated  procedure;  and,  better 
yet,  does  not  void  your  warranty  if  you  follow  the 
very  good  directions  in  the  DDT  booklet.  I  found  only 
one  minor  fault  with  the  instructions:  if  you  have  an 
early  disc  drive  (for  example,  one  with  a  serial 
number  of  1800  as  contrasted  to  one  with  a  serial 
number  of  6000-7000),  then  the  trimpot  screw  does  not 


face  to  the  side,  but  faces  down.  You  have  to  re- 
move four  more  Phillips  screws  in  order  to  reach  the 
adjustment  screw.  Then  you  must  place  the  disc  drive 
so  that  the  trimpot  screw  overhangs  the  edge  of  the 
table.  Now  you  can  adjust  the  disc  drive's  speed  while 
the  drive  is  in  a  normal  position. 

Since  I  was  curious  not  only  as  to  how  this  pro- 
gram compared  to  DSPEED  but  also  to  die  disc  speed 
adjustment  program  on  Apple's  diagnostic  test  disc,  I 
went  to  a  local  computer  store  where  we  compared 
all  three  programs  on  two  different  disc  drives. 
The  results  are  shown  below.  While  each  one  is 
different,  they  all  result  in  the  same  conclusion: 
Each  drive  is  slightly  slow;  but,  since  they  are  well 
within    tolerances,    the   two   drives   did   not    need   ad- 
justing. 

Program  Disc  Drive  1  Di.sc  Drive  2 

Apple's  0  to  -3  0  to  -2 

DSPEED  -I  to  -4  0  to  -2 

DDT  (299.1)  (299.-5) 

Why  should  you  adjust  your  drives?  If  you  only  have 
one  disc  drive,  it's  not  too  important  to  adjust 
your  disc  speed  unless  it's  way  out  of  whack.  It  is 
important  when  you  are  using  two  disc  drives  to 
copy  programs  from  one  to  the  other.  II  you  are 
using  the  fast  copy  method  (about  28  seconds)  with 
two  disc  controller  cards,  then  it  is  critical  (hat 
the  two  drives  be  closely  aligned.  If  you  want  all  of 
the  data  to  be  properly  transferred,  the  drives  should 
be  within  one  percent  of  each  other,  which  is  less 
than  three  revolutions  per  minute  difference,  Disco- 
Tech  states  that  an  incorrect  motor  speed  can  cause 
data  to  be  lost  when  the  program  is  either  loaded 
or  saved  to  disc.  Unfortunately,  the  disc  motor  is 
easily  jarred  out  of  alignment,  so  this  program  should 
be  run  every  lime  you  transport  your  disc  <lrivcs. 
Otherwise,  a  monthly  check  is  probably  sufficient. 

When  you  order  DDT,  be  sure  to  specify  either 
Apple  or  TRS-80  as  the  price  is  the  same  for 
either  ($19.95).  The  TRS-80  version  is  al.so  available 
on  cassette  for  $14.95;  the  Apple  version  only  comes 
on  diskette .  Disco-Tech  is  a  division  of: 

Morton  Technologies,  Inc. 
P.O.  Box  11129 
Santa  Rosa,  CA  95406 

If  you  are  a  resident  of  California,  you  must  include 
6%  sales  tax.    Happy  computing.  © 
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Apple  Software 

GHOST  TOWN 

ADVENTURE 

Scott  Adams'  newest'  Ttiineen 
treasures  tiidden  in  a  gtiost  town 
Be  ready  for  a  lot  ot  surprises  and 
real  gtiosts 

Cassetle/24K/M     S14  95 

SUPER  INVASION 

Ttie  best  invaders  game  available 

on  fiome  computers'  Sensational 

Software 

Cassalle/32K/M  S19  95 

WINDFALL 

Put  yourself  m  ctiarge  of  Engulf 
Oil-  Try  to  keep  consumer  prices 
down  and  still  maintain  a  profit 
Edu-Ware 

Ca5selte/32K/A $14  95 

Di3k/32K/A J19  95 

VISICALC 

Calculate  sales  projections, 
income  taxes,  personal  budget. 
cost  estimates,  even  balance 
your  ctieckbook  wittiout  a  pencil 
and  paperi  Personal  Software 

Disk/32K/A $150  00 

ANDROID  NIM 

Wonderfully  animated  version  of 
the  popular  game  called  Nim 

Disk/24K/M   $17  95 


MAGIC  PAINTBRUSH 

Incredible  grapriics  are  easy  with 
ttiis  program  Use  your  game 
paddles  to  indicate  two  points  on 
ttie  screen,  press  a  button  to  draw 
a  line  between  them  Use  fill 
mode  to  fill  m  areas  of  the  screen 
with  color,  paintbrush  mode 
(nine  differerit  size  brushes)  lo 
paint  on  the  screen  Save  your 
drawings  Or  shape  tables  as  B 
files  Includes  Slot  fulachme  and 
Applesoft  Invaders  lo  show  what 
you  can  do    MP  Software 

Disk/32K.  A  ROfil S29  95 


5ARG0N  II 

The  chess  program  that  beat  ail 
Ihe  others  Faster  response  time 
and  even  a  hint  mode'  Hayden 

Cassette/24K/fyi  529  95 

Disk  ^SK/lyl  S34  95 

Also  available  Sargon  I 
Cassette/24  K/'M  $19  96 

THREE  MILE  ISLAND 

Can  you  prevent  the  radiation 
from  lea  king  into  the  air  while  sli  II 
making  a  profit?  Only  you  can  tell 
in  this  nuclear  holocaust  Simula- 
lion  MUSE 
Disk/48K/I   $39.95 

BEST  OF  MUSE 

Tank  Attack.  Escape,  Nflaje 
Game.  Music  Box.  and  Side 
Shows,  ail  on  one  disk 

DiSh/16K/l   $39  95 


MICROSOFT 
ADVENTURE 

The  people  who  wrote  8ASIC  for 
all  Ihe  personal  computers,  now 
bring  you  a  version  of  theorigmal 
Adventure  You  no  longerneed  a 
PDP-10  for  the  oower  of  the 
original  game 
Di5k'32K'M  S29  95 

BASEBALL 

High  resolution  sports  excite- 
ment as  you  control  players. 
Balls  and  strikes  tallied  as  you 
control  pitches  and  swings 
f^USE 
Cassette  16K  A-ROM    .  ,   $14  95 

Pet  Software 

RESCUE  AT  RIGEL 

Search     the     moon    base     and 
rescue  Delilah  Rookh  from  the 
High  Tollah    (.Automated  Simu- 
lations) 
24K  Pet  Tape $19  95 

DATESTONES  OF  RYN 

Cross    swords    with   a    band    of 
dastardly     robbers.     Real    lime 
adventure  with  graphics    (Auto- 
mated Simulations) 
16K  Pet  Tape $14.96 

STARFLEET  ORION 

Command  a  starfleet!  2  player 
game  system  includes  rule  book, 
battle  manual,  control  sheets,  2 
programs.  22  space  ship  types 
and  12  play  tested  scenarios 
8K  Pet  Tape $19.95 


INVASION  ORION 

Similar  to  Starfleet  Orion  except 

single    player    only,    different 

scenarios. 

16K  and  32K  Pet  versions  on  one 

tape  $19.95 

GAME  PLAYING  WITH 
BASIC  TAPE  1,  TAPE  2, 
AND  TAPE  3 

by  Hayden S9.95  each 


SoftSlde  Magazine  thetiest 

software  magazine  for  the  Apple. 
TRS-80,  and  Alan  computers 
$18:year  (12  issues! 

SoftSlde:  Apple  programs 

on  cai*stta  $39  0  0  lor  6  months 
on  dlikelta  569  00  for  6  months 

Introductory  Spedall 

Until  Nov  1  Magazine  S15/yr 
With  cassette  $69  95.'yr  With 
disk  $129  95/yr 

This  ii  only  a  very  small 
sample  of  our  product 
line.  For  a  complete  se/ec- 
tion,  send  $1  for  our  cata- 
log of  hardware,  software 
and  publications  and  re- 
ceive a  $2  credit  toward 
your  first  order. 
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Integer  BASIC 
Mactirne  Language 
Applesoft 
-  Applesoft  card  Of 
Apple  II  Plus  only 


K nC ^OmWWn^lFC  CXCmMnnQC  e  SOUTH  ST.,  milford,  nh  o30S5 

To  order:  Calf  Toll-free  1-800-258-1790  on 

Thf  SoflwJrf  Ixihinge  &  Hjrt/Sidt  fOiv  or  Robniille  *  Sons,  fnlerpriiei.  Inc  I,  SokSide  fubliciniim 
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Assembly 

Language 

Programming 

witffuCSD 

PASCAL 

J,  M.  Moshell 

This  article  is  primarily  about  using  the  APPLE  II 
version  of  UCSD  PASCAL  to  write  6502  assembly- 
language  programs,  and  use  them  with  PASCAL  pro- 
grams. Much  of  what  is  described  can,  however,  be 
used  with  other  UCSD  PASCAL  microcomputer 
systems.  We  include  as  an  example  a  program  to 
make  low-resolution  16-color  APPLE  graphics  avail- 
able to  PASCAL. 

General  Issues  about  assembler/PASCAL  relations. 

The  UCSD  system  uses  a  very  sophisticated  " 
psuedo-machine"  (P-machine)  or  interpreter  pro- 
gram, which  looks  to  the  user  like  a  sixteen- 
bit  micro-computer  with  a  "pure  stack"  architec- 
ture (no  data  registers);  all  operands  are  on  the 
top  of  a  stack,  and  the  result  of  an  operation  is 
put  back  there.  The  UCSD  system  not  only  places 
data  on  the  stack,  it  actually  places  executable 
code  on  the  stack  when  it  is  brought  in  from  disk. 
These  chunks  of  code  may  either  be  P-machine 
code  or  6502  code.  Their  interrelation  is  quite 
complex,  and  the  APPLE  PASCAL  manual  (essen- 
tially the  UCSD  PASCAL  manual,  customized  for 
APPLE)  does  a  reasonable  job  of  explaining  the 
operation  of  the  system,  assuming  you  have  a 
graduate  education  in  computer  science.  APPLE 
promises  a  new  book  in  April,  1980.  Here  we're 
only  interested  in  making  you  a  fluent  assembly- 
language  user,  so  we'll  skip  most  of  the  unnecessary 
details. 

Basically,  you  may  write  any  number  of 
assembly-language  subroutines,  and  link  them 
together  with  a  PASCAL  "host  program".  Some- 
times the  host  is  trivial,  doing  nothing  but  calling 
your  assembly-language  program.  This  linkage  is 
done  by  the  LINKER  program,  and  is  not  compli- 
cated to  perform,  if  you  have  built  the  proper 
buttons  and  hooks  into  the  host  and  the  sub- 
routines. 

The  examples  in  the  APPLE  book  are  simple 
and  accurate.  The  .PROC  pseudo-operator  in  your 
assembly  program  declares  a  name  that  can  be  used 
by  the  LINKER  to  make  a  connection  with  a  pro- 
cedure name  that  is  declared  EXTERNAL  in  the 


host  program.  Rather  than  repeating  the  APPLE 
manual  we  will  concentrate  on  areas  they  don't 
stress. 

Labels  in  an  assembly  program  can  receive 
their  values  in  two  ways;  cither  by  the  EQUatc 
p.seudo-op,  or  by  being  attached  to  a  line  of  code. 
In  simple-minded  ab.solute  assemblers  like  that  of 
CP/M,  you  can  form  complex  expressions  based  on 
the  assignment  of  value  to  a  label;  but  the 
UCSD  PASCAL  assembler  requires  care  in  the 
construction  of  expressions.  Any  label,  whose  value 
is  determined  by  being  attached  to  a  line  of  code, 
is  a  relocatable  value.  Its  actual  value  will  be 
assigned  at  run-time.  Thus  it  cannot  be  used  in 
forming  any  arithmetic  expressions  that  involve  more 
than  adding  a  constant  value  to  the  relocatable 
value  (e.g.  LDA  LABEL  1  +  1  is  o.k.,  and  will  load 
accumulator  with  the  contents  of  the  byte  just  after 
LABEL  1).  However,  multiplying  or  dividing  a  reloca- 
table value  is  illegal,  since  the  run-time  system  hasn't 
got  mechanisms  for  evaluating  such  expressions.  For 
instance,  in  absolute  assemblers,  we  would  use  some- 
thing like: 

LDA  #TABLE/256 
STA  POINTER  +  1 

to  pick  up  the  high  byte  of  TABLE'S  address,  and 

LDA  #TABLE  MOD  256 
STA  POINTER 

to  get  its  low  byte. 

With  UCSD  PASCAL,  we  have  to  use  the  following 

slightly  more  cumbersome  technique: 

LDA  TABADDR  +  1;  high-byte 
STA  POINTER  +  1 
LDA  TABADDR  ;  low-byte 
STA  POINTER 

TABADDR:  .WORD  TABLE;  store  (relocatable) 

address  of  table  here. 

TABLE:  .BYTE  0,  2,  4,  15,  40 

Now,  the  relocating  loader  will  store  the  value  of 
label  TABLE  at  location  TABADDR.  You  can  then 
pick  it  to  pieces  by  bytes,  when  your  program  runs. 
The  second  way  in  which  labels  receive  values 
is  via  the  EQUate  pseudo-op.  The  expression  to  the 
right  of  the  EQU  can  contain  absolute  values  freely 
intermixed  with  arithmetic  and  logical  operators,  but 
can  only  contain  one  relocatable  expression  to  be 
added  to  the  result  of  the  absolute  arithmetic.  Thus, 
two  legal  EQUates  are: 

LABELl  .EQU  80  ;reference  to  page  zero, 
location  80 
LABEL  2    EQU  L5   +  LABELl/4 

L5:  .BYTE  44  ;L5  evaluated  by  its  position  in 
the  code  file. 

Another  common  source  of  confusion  is  that  the 
UCSD  Assembler  stricdy  segregates  code-generating 
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operations  (.PROC  and  .FUNC)  Iroin  non-todc- 
generaling  directives  such  us  .EQU,  Thus  you  cannot 
put  an  .EQU  at  any  convenient  place  within  a 
code-riie;  they  must  all  occur  before  the  first  .PROC 
in  your  source  file.  The  "high-level  syntax" 
diagram  in  the  assembler  manual  is  worth  some  study. 
"Local  labels"  such  as  $1  in  this  $1; 

INC  COUNTER 
BNE  SI 

are  useful  but  tricky.  They  are  useful  because 
they  don't  "last";  they  are  unknown  except  within 
a  range  of  code  delimited  by  two  "real"  labels; 
thus  you  can  use  SI  as  a  local  label  for  short 
jumps  anywhere  within  your  program  as  long  as 
another  $1  isn't  "within  sight".  The  tricky  part 
is  that  sometimes  you  will  interpose,  by  accident, 
a  real  label  during  code  modification,  creating  some- 
thing like 

$1  INC  COUNTER 
JUMPIN:  DEC  RECORD 

BNE  $1 

NEXTLBL:  etc 

The  assembler  error  message  will  occur  ai 
NEXTLBL,  even  though  the  error  was  the  inser- 
tion of  JUMPIN.  The  problem  is  that  the  one- 
pass  assembler  keeps  on  looking  (within  the  region 
between  JUMPIN  and  NEXTLBL)  for  a  local  Si 
to  jump  to;  it's  been  "cut  off  from  the  one 
above  JUMPIN.  When  NEXTLBL  ends  the  region, 
an  error  results,  far  from  its  cause.  Beware; 
always  check  that  the  jump  and  the  local  label  can 
"see  each  other". 

Communication  with  the  PASCAL  host  program 
is  well-described  by  the  APPLE  manual.  Communi- 
cation with  other  assembly  routines  is  also  easy, 
but  there  are  a  few  twists.  The  pseudo-ops.  .PROC 
and  .DEF  make  any  label  to  which  they  are 
attached,  at  the  head  of  a  routine,  known  to  everyone 
else  participating  in  linkage.  Thus  you  can,  in  a 
separate  source-file,  use  the  .REF  pseudo-op  to  make 
a  label  meaningful  to  this  procedure,  either  for 
data  access  or  for  jumping  to.  For  instance: 

In  one  source-file: 

.DEF  DATATABLE,  FIXUP 
.PROC  PARTI 

DATATABLE:  .BYTE  11,  40,  80,  OBO 

FIXUP:  LDA  ETC  ; subroutine  to  be  called  from 
both  within 

;PART1  and  from  PART2. 
In  another  source  file: 

.REF  DATATABLE,  FIXUP 
.PROC  PART  2 

LDA  DATATABLE  +  1 
JSR  FIXUP 


You  can  put  several  .PROCs  in  one  source  file; 
this  is  convenient  since  that  file  becomes  a  kind  of 
"library",  and  may  be  the  only  thing  you  have  to 
link  to  your  host.  However,  you  cannot  use  REF 
and  DEF  between  .PROCS  in  the  same  source  file! 
In  a  strange  way,  a  data-table  in  another  source 
file  is  more  accessible  to  some  routine  than  one  in 
its  own  source  file. 

Some  Semi-Legal  Communications  Windows 
between  PASCAL  and  Assembly  Language 

The  "official"  ways  of  coininunicaling  between 
assembly  programs  and  PASCAL  hosts  are:  procedure 
parameters  and  function  values,  and  .PUBLIC  and 
.PRIVATE  entries  in  the  global  symbol  table 
(that  is,  COMMON,  to  you  FORTRAN  types). 
These  are  well  documented  in  the  APPLE  manual. 

However,  several  "unofficial"  ways  exist  for 
getting  from  one  realm  to  the  other.  They  rely  on  a 
sneaky  trick  which  allows  us  to  violate  the  type- 
rules  of  PASCAL;  that  is,  the  rules  which  separate 
integers  from  characters,  etc. 

We  will  use  pointer  variables  in  this  discussion. 
Briefly,  a  pointer  variable  is  a  machine-memory 
address.  In  PASCAL  they  are  widely  used  for  linked- 
list  management,  and  for  many  other  things.  If 
a  pointer  varible  P  is  to  be  used  as  a  "pointer 
to  integers",  then  it  is  declared  by 

VAR  P:''lNTEGER; 
and  the  expression 

pA 

refers  to  whatever  location  the  pointer  variable  P  is 
currently  pointing  at,  viewed  as  a  16-bit  integer. 
Thus,  Y:  =^p    would  pick  up  the  integer  value  to 
which  P  points  and  put  it  into  variable  Y. 

We  could  thus  use  pointers  to  make  PEEKS  and 
POKES  if  we  just  had  a  way  of  assigning  an  integer 
value  to  the  pointer  itself  (the  address  we  want  to 
look  at).  However,  PASCAL  doesn't  want  to  let  us  do 
that,  because  pointer  is  a  different  type  than 
integer. 

However,  there  exists  a  special  declaration,  which 
allows  liuo  different  identifiers  to  refer  to  the 
same  memory  location.  Thus,  we  will  "trick" 
PASCAL  into  giving  that  location  both  a  pointer- 
name  and  an  integer  name.  We  can  then  assign 
values  to  the  integer  name,  and  get  at  "what 
it  points  to".  The  code: 

VAR  X  :  RECORD 

CASE  BOOLEAN  OF 
TRUE:  INT:  INTEGER; 
FALSE:  PTR:'^INTEGER 
END; 

I  won't  explain  why  this  particular  notation  was 
used;  but  it  works.  Thus  we  can  do  a  PEEK  at 
location  1000,  say,  by  making  the  assignments: 

X.INT:  =1000; 

YiX.PTR'^ 
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Now  Y  contains  the  value  that  is  in  (decimal) 
locations  1000  and  1001  (low  and  high  order  bytes 
of  a  16-bit  word).  We  illustrate  the  trick  with  a  PAS- 
CAL Function  PEEK16: 

FUNCTION  PEEK16  (LOC:INTEGER): 

INTEGER; 

VAR  X:  RECORD 

CASE  BOOLEAN  OF 

TRUE:  INT:  INTEGER; 

FALSE:  PTR:  INTEGER 

END; 
BEGIN 

X.INT:  =LOC; 
PEEK:  =X.PTR'^ 
END; 

A  16-bit  POKE,  and  byte-sized  PEEKS  and  POKES 
are  supplied  at  the  end  of  the  article. 

Now,  for  those  of  you  who  know  something 
of  pointer  variables  and  dynamic  storage  allocation, 
you  can  use  a  POKE  like  the  above,  to  store  a  pointer- 
value  in  some  memory  location  (e.g.  in  page  0)  then 
access  it  from  assembly  language  to  refer  to  the 
structure  in  dynamic  storage  to  which  the  pointer 
points.  (For  those  of  you  who  don't  use  pointer 
variables,  don't  worry  about  it.) 

Some  specifically  APPLE  tricks  for  coding  and 

debugging  assembly  language. 

All  the  foregoing  has  been  applicable  to  any  UCSD 

PASCAL  system.  Let's  look  at  some  specific  APPLE 

stuff. 

First,  the  pseudo-machine  interpreter  in  the 
APPLE  is  located  at  the  high  end  of  memory,  in 
the  RAM  on  the  language-card.  The  pseudo- 
machine uses  page  zero  memory  locations  36  to  A 1 
(hex).  Locations  0-35  are  temporaries;  they  are 
used  by  the  P-machine  and  Turtlegraphics,  but 
you  may  trash  them.  Locations  A2-EF  are  "officially" 
reserved  for  the  P-machine,  but  unused.  I  would 
recommend  using  them  from  the  top  down,  since 
minor  mods  to  the  P-machine  may  come  out  later 
that  use  more  space  upwards  from  A2.  Thus,  data 
which  you  want  to  survive  from  one  call  of  your 
assembly  program  to  another  can  reside  in  the  area 
A2-EF. 

Second,  PASCAL'S  use  of  memory  (specifically, 
the  dynamic  heap)  starts  slighdy  above  location 
1000  (hex).  To  "free  up"  the  memory  region  2000- 
4000  for  use  as  a  high-resolution  video  buffer, 
one  can  use  the  following  trick  (with  our  "two- 
faced  pointer",  X,  above). 

X.INT  :  =  16384  ;  ('  =4000  hex  *) 

RELEASE(X.PTR);  ('Moves  Heap  to  4000*) 

This  should  be  done  "first  thing"  in  the  main 
body  of  your  PASCAL  host  program,  if  you're  going 
to  do  high-resolution  graphics.  Of  course,  you  can 
also  do  that  by  calling  INITTURTLE;  this  is  exactly 
what  they  do. 


One  of  the  most  difficult  things  about  programm- 
ing in  any  computer's  assembly  language  is  debugging. 
With  DDT  in  CP/M,  or  equivalent  systems,  you  can 
"trace"  a  program,  operation  by  operation,  and  see 
where  it  goes  wrong  (assuming  you  understand  your 
own  code.)  In  fact  the  APPLE  ROM  MONITOR 
used  to  contain  trace  and  breakpoint  facilities;  but 
they  were  removed  when  the  auto-start  feature  was 
added;  so  your  APPLE  with  the  Pascal  Language  card 
won't  help  much  for  debugging. 

However,  it  is  possible  to  "breakout"  of  an 
assembly  program,  use  the  Monitor  to  examine 
memory  locations,  and  then  resume  operation  of  the 
program,  e%'en  returning  to  the  PASCAL  host  pro- 
gram. The  main  trick  is  to  know  how  to  turn  off 
the  Language  Card's  RAM  memory,  which  is  over- 
laying the  ROM  MONITOR.  The  following  pieces 
of  code  are  a  small  "macro  library",  which  I 
include  in  the  head  of  each  of  my  assembly  routines. 
;  DEBUGGING  AIDS  FOR  APPLE  ASSEMBLER 

.MACRO  MONWHERE  ;store  address  of  $1 

JSR  $1  ;at  location  (15,  06) 

$1  PL  A 

STA  16  ;assembler  assumes  numbers  are 

hexidecimal 

PLA 

STA  15 

.ENDM 

.MACRO  MONCALL  ;store  registers  at 

STA  12  ;locations  (12,  13,  14); 

STX  13 

STY  14 

STA  0C082  ;select  the  monitor  ROM 

JMP  0FF59  ;jump  to  the  monitor 

.ENDM 

.MACRO  RETFAS 

STA  0C08B  ;RESTORE  RAM  TO  PRE-BREAK 

;CONDITION. 

RTS  ;AND  RETURN  TO  PASCAL. 

.ENDM 

MONWHERE  is  used  to  determine  where  in  memory 

the  code-file  is  loaded  at  present.  Since  JSR 

"pushes"  the  return  address  on  the  stack,  vve  merely 

pull  it  off  again  and  store  it  for  examination  by 

the  monitor. 

MONCALL  stores  the  register  contents,  then 
enables  the  monitor-ROM  and  jumps  to  the  monitor. 
Several  monitor-calls  can  be  put  into  a  given  assembly 
program  and  used  almost  like  break-points.  It  is  also 
possible,  using  the  monitor,  to  put  JMP  instructions 
to  the  head  of  the  MONCALL  macro  (JMP  is 
easier  to  install  than  the  whole  thing,  when  you're 
working  in  hex-code). 

RETPAS  is  used  to  return  to  a  PASCAL  hcst 
program.  Since  MONCALL  turns  off  the  Language 
Card  RAM  to  get  at  the  Monitor  ROM,  we  must 
switch  back  to  RAM  to  go  back  to  PASCAL.  To  use 
RETPAS  it  is  necessary  to  have  saved  the  return 
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address  from  the  stack,  before  entering  the  ROM 
monitor.  In  the  example  program  PUT40  (at  the 
end  of  this  article)  we  use  an  "interface  sequence" 
to  connect  PASCAL  to  the  assembly  routine  PLOT: 

POP  RETURN  ;  POP  is  a  macro,  stores  return 

addr.  at  RETURN. 

POP  YLOC  ;  Pull  16-bit  param.  arguments  off 

stack. 

POP  XLOC 

POP  COL 

LDA  COL  ;  Move  low-order  half  to  another  place 

STA  COLOR  ;  in  Page  0 

JSR  PLOT  ;  Go  to  actual  routine 

PUSH  RETURN  ;  Put  PASCAL  return  address 

back  on  stack. 

RTS  ;  and  return  to  host  program. 

RETURN:  .WORD  0 

XLOC:  .WORD  0 

YLOC:  .WORD  0 

COL:  .WORD  0 

To  modify  and  reassemble  the  routine  for  monitor 

breaks,  one  would  remove  RTS  and  insert  the  macro 

RETPAS.  MONWHERE  and  MONCALL  could  be 

inserted  at  various  points  in  PLOT  for  debugging 

purposes. 

RETPAS  will  work  whether  or  not  a  monitor 
call  actually  occurs;  so  it  could  be  left  in  place 
if  desired,  for  future  debugging. 

A  useful  plan  for  debugging  an  assembly/ 
PASCAL  program  package  is  to  put  "debugging 
statements"  in  the  PASCAL  host,  which  print  out 
all  the  variables.  A  RE.A.DLN  command  is  also  in- 
serted inside  any  loop  which  contains  calls  to  the 
assembly  routines.  Thus,  whenever  you  are  in 
PASCAL  carriage-return  moves  you  through  the  loop, 
allowing  time  to  note  the  values  printed  by  the 
debugging  statements.  When  you  hit  a  MONCALL 
in  the  assembly  routines,  you  can  note  the  state 
of  assembly-level  variables  by  examining  location 
(15,  16  -hex)  to  find  the  code's  absolute  address, 
then  dumping  memory  (or  deasscmbling  it  with  the  L 
command)  to  locate  the  memory  variables.  This 
combination  of  PASCAL-level  and  assembly-level 
debugging  output  is  usually  sufficient  to  debug 
anything  you  may  write,  if  you  are  careful  in  the 
first  place. 

We  will  conclude  with  a  "guided  tour"  of  a 
simple  program  called  QUILT. 

QUILT:  an  example  of  PASCAL  with  assembler. 
The  QUILT  program  is  a  simple  "pattern-repeating" 
program.  A  cursor  color  is  selected  with  game- 
paddle  0.  Typing  keys  around  'K'  moves  the  cursor 
(e.g.  typing  T'  moves  it  upward.)  When  you  type 
'R'  the  pattern  is  repeated,  wrapping  around  the 
screen  as  it  runs  off  an  edge.  This  program  is  used 
as  a  first  lesson  in  the  concept  of  loops,  in  the 
high  school  computer  science  curriculum  which  we  are 
developing. 


Let's  "walk  through"  QUILT;  first,  we'll 
examine  the  PASCAL  code,  then  the  assembly  code. 

PASCAL  has  a  very  rigid  structure;  you  must 
declare  constants,  then  variables,  then  procedures, 
then  have  the  main  program.  Procedure  EXPLAIN  is 
used  so  as  to  place  the  explanation-text  close  to 
the  beginning  of  the  source  program,  to  avoid  having 
to  repeat  it  in  a  block  comment.  Procedures 
C0L0R40  and  PUT40  are  declared  as  EXTERNAL, 
meaning  that  they  will  be  attached  later  by  the 
LINKER.  They  will  be  in  assembly  language. 

Procedures  PUTBUMP  and  FIXIT  arc  con- 
venient, since  their  task  is  needed  several  places 
in  QUILT. 

The  main  program  consists  of  two  parts;  First, 
the  input  keystroke  sequence  is  stored  until  'R'  is 
hit.  Then,  the  sequence  is  replayed  until  any  key  is 
hit.  We  see  that  the  main  program  begins  with  calls 
to  procedures  EXPLAIN  and  READLN.  The  call  to 
READLN  just  "stalls"  while  you  read  the  explana- 
tion, and  hit  a  carriage  return.  COLOR40  turns  on 
the  APPLE  in  low-resolution  mode.  CLEAR40 
clears  the  screen.  We  then  go  through  a  "case" 
statement  to  make  entries  in  two  arrays,  XLIST 
and  YLIST,  which  store  changes  in  the  X  and  Y 
position  of  the  cursor. 

When  an  'R'  is  typed  we  fall  out  of  the  REPEAT.. 
UNTIL  loop,  and  into  another  loop  REPEAT... 
UNTIL  KEYPRESS.  This  loop  repeatedly  goes 
through  the  XLIST  and  YLIST  arrays,  using  them  to 
move  and  display  the  colored  cursor. 

Finally,  we  have  a  call  to  TEXTMODE  which 
is  hit  after  the  program  detects  'Q'  (quit).  If 
this  is  not  done  you  wind  up  back  at  the  UCSD 
PASCAL  monitor,  but  still  in  graphics  mode;  this 
is  confusing. 

Now  let's  look  at  the  assembly  routines: 

Note  first  that  we  use  .INCLUDE  MACROS 
TEXT.  We  don't  see  the  macros  expanded  here, 
but  they  are  present  when  the  file  is  assembled 
just  as  if  typed  in. 

We  sec  PROC  COLOR40,  which  just  hits  the 
correct  memory  addresses  to  set  the  APPLE  up 
in  low-resolution  mode  with  a  4-line  text  buffer 
still  visible  (for  user  instructions). 

PROC  PUT40  uses  three  parameters;  these  are 
"POP"  ped  off  the  stack  and  stored  in  memory 
words  (since  integers  are  pushed  as  16-bit  words  by 
PASCAL).  POP  is  another  macro  in  MACROS. 
TEXT;  see  the  end  of  this  article  for  macros  POP, 
PUSH  and  COPY,  useful  accessories. 

The  actual  40  x  40  plot  routine  is  just  copied 
from  the  ROM  monitor;  we  could  have  actually 
jumped  to  it  rather  than  including  it  here.  It 
performs  an  address  calculation  to  deal  with  the 
apple's  strange  way  of  mapping  memory,  puts  the 
color  in,  and  returns  to  the  "interface"  routine 
at  the  top.  That  routine  pushes  RETURN  on  the 
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hardware  stack  and  returns  to  PASCAL. 

Good  luck  in  writing  assembly  programs  with 
PASCAL! 

(Much  thanks  to  Charlie  Hughes  and  At  Hoffman  fm  assistance 

and  ideas.) 

Afvre  cnmmonly  used  macros: 

.MACRO  PDP 
PLA 

STA  %1 
PLA 

STA  %  1  +  1 
.ENDM 

.MACRO  PUSH 

LDA  %  1  + 1 
PHA 
LDA  %  1 
PHA 
.ENDM 

MACRO  COPY 

LDY  #%3  ;  COPIES  UP  TO  256  BYTES 
JI;  LDA  %1,Y  ;USED  AS  FOLLOWS 
STA  %2,Y  ;COPY  SOURCE,  DEST,  LENGTH 
DEY  jSOURCE,  DEST  ARE  LABELS 
BNE  $1  ;LENGTH  IS  lNTEGER,0-255 
.ENDM  ;0  MEANS  COPY  256  BYTES.) 

POKE  and  PEEK  require  the  following  declarations: 

TYPE  BYTE  =0. 255;  ARRAY8  =  PACKED  ARRAY  [0..1] 
OF  BYTE; 

VAR  X:  RECORD 

CASE  BOOLEAN  OF 

TRUE:  (INT:  INTEGER); 

FALSE:  (PTR:-^  INTEGER) 

END; 
Y:  RECORD 

CASE  BOOLEAN  OF 

TRUE:  (INT:  INTEGER); 

FALSE:  (PTR:^ARRAY8) 

END; 
PROCEDURE  PIKE16(WHAT,WHERE;INTEGER); 
BEGIN 

X. INT:  =  WHERE; 
X.PTR^:=WHAT 
END; 

PROCEDURE  POKE8{WHAT,WHERE:INTEGER(); 
BEGIN 

Y.INT:  =  WHERE; 
Y.PTR'^[0]:  =WHAT 
END; 

FUNCTION  PEEK8(WHERE: INTEGER): INTEGER; 
BEGIN 

Y.INT:  =  WHERE; 
PEEKS:  ^Y.PTR/NlOl 
END; 

PROGRAK  QUILT? 

USES  APPLESTUFF,TURTLEGR,- 
CONST  SEEDSI2E  =  S0,- 
VAR   LI£TPTR,X,Y,I,COL:IKTEGER; 
XLIET,YLIST,CLI£T: 
ARRAY10..SEEDSIZE1OF  INTEGER; 
INCHAR:  CHAR; 
PROCEDURE  EXPLAIN; 
BEGIM 
KRITELN; 

VJRITELM( 'THIS  PROGRAM  LETS  YOU  DRAVJ '  )  ; 
WRITELHCA  PICTURE  AMD  T!1EM  MAKE  A' )  ; 
WRITELN('  ''QUILT''  OF  IT  BY  REPEAT-'); 
WRITELNCING  THE  PATTERN.  TO  DRAW:'); 
WRITELN; 

KRITELN ('SET  PADDLE  0    FOR  A  COLOR'); 
WRITELN ( 'TYPE  KEYS  AROUND  K  TO  MOVE'); 
WRITELN ('THE  DOT.  FOR  INSTANCE  ''I''  '); 
WRITELN ( 'MOVES  THE  DOT  UPWARD.'); 


WRITELN; 

VJRITELtU'TYPE    ''R''    TO    SEE   THE    PATTERN'); 

WRITELN ( 'REPEATED. ' ) ; 

WRITELN; 

'H''  TO  HALT  THE  REPEATING, 
'C'  TO  CLEAR  SCREEN.'); 
'QUIT''  TO  END  PROGRAM. 


'); 

TO  BEGIN.  '  )  ; 


WRITELN ( 'TYPE  ''H''  TO  HALT  THE  REPEATING,'); 

WRITELN ( 'TYPE  " " -" ' 

WRITELM( 'TYPE 

WRITELN; 

WRITELN ('NOW  TYPE  ''RETURN' 

WRITELN; 

WRITLEN{ 'REMINDERS: ') ; 

WRITELNi  'KEYS  AROUND  K  :  !-50VE;  I  =  UP,  J  =  LEFT,  ETC  .  '  )  ; 

WRITELN ( 'O LEAR   R)£FEAT   H) ALT  REPEATING   Q)UIT')' 

END; 

PROCEDURE  C0L0R4D;  EXTERNAL; 
PROCEDURE  PUT40 (COLOR: INTEGER; 
XLOC: INTEGER; 
YLOC: INTEGER) ;EXTERKAL; 
PROCEDURE  CLEAR40; 
BEGIN 

FOR  );:={)  to  39  DO 
FOR  Y:=0  to  39  DO 
PUT40(G,X,Y) ; 
X:=2erY:=2D; 
END; 


PROCEDURE  PUTBUMP; 
BEGIN 

LISTPTR : =LISTPTR+1 ; 

IF  LISTPTR=SEEDSI2E  THEN  LISTPTR:=B 
PUT40(COL,X,Y) 
END; 


FUNCTION  FIXIT(ARG:INTEGER) : INTEGER; 
(*THIE  IS  NECESSARY  BECAUSE 
UCSD'S  'MOD'  FUNCTION  DOESN'T 
WORK  FOR  NEGATIVE  NUMBERS . DON'T 
REALLY  KNOVf  WHY  THAT  IS.*) 
BEGIN 

FIXIT:=ARG; 

IF  ARG>39  THEN  FIXIT: =ARG-40 ; 
IF  ARG<D  THEN  FIXIT:=ARG+40 ; 
END; 


(*  MAIN  PROGRAM 


THIS  CONSISTS  OF  T5>'0  PARTS,  THAT 
ARE  REPEATED  UNTIL  SOMEONE  TYPES  'Q': 
THE  FIRST  PART  BUILDS  UP  AN  IMAGE 
IN  THE  ARRAYS  XLIST. YLIST, CLIST, 
WITH  XLIST  AND  YLIST  STORING  THE 
'MOVES'  -THAT  IS,  0,+l  OR  -1,THAT 
RESULT  FROM  EACH  KEYSTROKE.  CLIST 
IS  A  LIST  OF  COLORS  THAT  WERE  IN 
EFFECT  AT  THE  TIME  OF  EACH  KEYSTROKE. 
THE  SECOND  PART  RUNS  THROUGH  THE 
THREE  LISTS  AGAIN  AND  AGAIN,  MOVING 
THE  'CURSOR'  by  ADDING  XLIST[I] 
TO  X,  AND  YLISTdl  TO  Y, 
AND  CHANGING  THE  COLOR  'COL'  to 
CLISTlIl . 

WE  LET  I  RUN  FROM  0  TO  'LISTPTR-1' 
BECAUSE  LISTPTR  WAS  'BUMPED'  EVERY 
TIME  A  PICTURE  ELEMENT  (PIXEL)  WAS 
ADDED;  SO  IT  IS  ONE  TOO  BIG. 
*) 

BEGIN 
(*SETUP  STUFF*} 
EXPLAIN; 
READLN; 
COLOR40; 
CLEAR40; 
INCHAR:-'  '; 
WHILE  INCHARO'O'  DO 

BEGIN 
(*  PART  1  :  GET  A  PATTERN  *) 
X:=20;  y:=20; 
LISTPTR:=a; 

REPEAT  (*  UNTIL  'R'  *) 
REPEAT 

COL:  ■=  PADDLE  (0)  DIV  16; 
PUT40(COL,X,Y) 
UNTIL  KEYPRESS; 
CLISTILISTPTR] :=COL; 
READ{KEYBOARD, INCHAR) ; 
CASE  INCHAR  OF 
'U':  BEGIN 

XLISTtLISTPTRl :=-l; 
X:=FIXIT(X-1) ; 
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YLISTILISTPTR) : 

=-1; 

Y:=FIXIT(Y-1) ; 

PUTBUMP 

END; 

'I' :  BEGIN 

XLIST[LISTPTR)  : 

=  0; 

YLIST[LISTPTRl  : 

=-1; 

Y:=FIXIT{y-l) ; 

PUTBUMP 

EHD; 

'0' :  BEGIN 

XLISTiLISTPTR]  : 

=1; 

X:=FIXIT(X+1) ; 

YLISTILISTPTR) : 

=-1; 

Y:=FIXIT(Y-1)  ,- 

PUTBUMP 

END; 

'J' :  BEGIN 

XLISTILISTPTR] 

=-1; 

X:=FIXIT(X-1) ; 

YLISTILISTPTR] 

=a; 

PUTBUMP 

END; 

'L':  BEGIN 

XLISTILISTPTR] 

=1; 

X:=PIXIT(X+1)  ; 

YLISTiLISTFTR] 

=  0; 

PUTBUMP 

END; 

'  M  '  :  BEG  I H 

XLISTILISTPTR] 

=-1; 

X:=FIXIT{X-1)  ; 

YLISTILISTPTR] 

-1; 

Y:=FIXIT(Y+1)  ; 

PUTBUMP 

END; 

',■:  BEGIN 

YLISTILISTPTR] 

:=l; 

Y:=FIXIT(Y+1) ; 

XLISTILISTPTR] 

:=0; 

PUTBUMP 

END; 

' . ' :  BEGIN 

XLISTILISTPTR] 

:=1; 

X:=FIXIT(X  +  1)  ; 

YLISTILISTPTR] 

:=l; 

Y:=FIXIT(Y+1); 

PUTBUMP 

END; 

<C<:    CLEAR4D; 

'Q':  BEGIN 

TEXTHODE 

EXIT{QUILT) 

END; 

END;(*  CASE  STATEMENT  *) 

UNTIL  INC!iAR='R'  ; 

(*  PART  2: 

KOSUELL'S  IMPROVED  4  0X4  0 
PIXEL-PUTTER...  HAS  THREE 
ARGUMENTS  (IN  PASCAL  ORDER: 

COLOR,  X-COORD,Y-COORD) . 

ALL  3  ARE  OP  TYPE  INTEGER. 

THE  ORIGIN  IS  IN  UPPER  LEFT 
CORNER;  X  IS  HORIZONTAL,  Y  IS 
VERTICAL. 

TiiESE  ROUTINES  COME  FROM  THE 
APPLE  ROM  MONITOR,  (IF  I'D  HAVE 
DONE  IT  I  WOULD  HAVE  PUT  THE 
ORIGIN  IN  LOWER  LEFT...) 

THE  FOLLOWING  PAGE  0  LOCATIONS 
ARE  JUST  LIKE  THOSE  USED  BY  THE 
MONITOR.  THEY  ARE  TEIIPS,  ONLY. 


GBASCALC  PHA 

LSR 

A 

AND 

t=E3 

ORA 

f04 

STA 

GBASH 

PLA 

AND 

#18 

BCC 

GBCALC 

ADC 

»7F 

GBCALC   STA 

GBASL 

ASL 

A 

ASL 

A 

ORA 

GBASL 

STA 

GBASL 

RTS 

.END 

GBASL 

.EQU 

26 

GBASH 

.ECU 

27 

MASK 

.EQU 

2E 

COLOR 

.ECU 

30 

THESE  MACROS  PROVIDE  THE  PUSH 
AND  POP  v;E  USE  BELOW. 
INCLUDE  MACROS. TEXT 

THIS  FIRST  ROUTINE  TURNS  ON  THE 
DISPLAY  IH  40  X  4G  COLOR  MODE, 
WITH  4  LIKE  TEXT  AT  BOTTOM.  TO 
GET  48  (VERT)  X  4fl  (HORIZ),  OMIT 


;  LAST 

LINE. 

.PROC 

COLOR4  0 

STA 

DCO50 

SELECT  COLOR 

STA 

SC054 

PAGE  1 

STA 

0Cfl56 

LO-RESOLUTION 

STA 

BCD53 

TEXT  @BOTTOM. 

RTS 

PUT4  0  TAKES  3  ARGUMENTS  (SEE  MAIN 
HEADER.  THIS  PRELIMINARY  ROUTINE 
IS  THE  'INTERFACE'  TO  PASCAL. 

.PROC    PUT4e,3 


NOW  WE  FALL  OUT   OF  THAT  'DRAWING' 
CODE  (REPEAT  BLOCK)  AND  FILL 
THE  SCREEN  WITH  COPIES  OF  THE 
DRAWN  IMAGE.*) 
REPEAT 

FOR  I:=0  TO  LISTPTR-1  DO 

BEGIN 

X:=FIX1T(X+XLIST|I] ) ; 
Y:=FIXIT(Y+YLIST| Ij ) ; 
COL:=CLIST(I] ; 
PUT40(COL,X,Y) 

END 
UNTIL  KEYPRESS; 

READ ( KEYBOARD, INCHAR) ; 

END;(*  BIG  'DO  WHILE  INCHARO'Q'' 
BLOCK.  WHEN  Q  IS  HIT, 
PROGRAM  ENDS.  *) 

TEXTMODE; 

END. 


POP 

RETURN 

POP 

YLOC 

WE  POP  STUFF  OFF  THE 

POP 

XLOC 

STACK  in  16-BIT 

POP 

COL 

WORDS,  THEN  DISSECT 

LDA 

COL 

BY  BYTES. 

STA 

COLOR 

JSR 

PLOT 

PUSH 

RETURN 

RTS 

RETURN 

.WORD 

0 

XLOC 

.WORD 

0 

YLOC 

.WORD 

0 

COL 

.WORD 

0 

;KERE 

IE  THE  PLO' 

PTER. 

PLOT; 

LDA 

YLOC 

LSR 

A 

PHP 

JSR 

GBASCALC 

DO  THE  BIT  PERMUTATIONS 

IDY 

XLOC 

LDA 

COLOR 

AND 

#0F 

PLP 

LO-BIT  OF  Y-ADDR 

BCC 

LONYB 

INTO  CARRY. 

ilGH-KYB 

CASE  (TOP 

HALF  OF  PIXEL) 

CLC 

ROL 

A 

ROL 

A 

ROL 

A 

ROL 

A 

COLOR  TO  HI-NYB 

STA 

COLOR 

LDA 

S0F 

HINDUP 

:  AND 

eCBASL.Y 

ORA 

COLOR 

STA 

@GBASL,Y 

RTS 

LONYB: 

STA 

COLOR 

LDA 

«0FO 

BCC 

WINDUP 

ALWAYS  TAKEN. 

THE  BASE-CALC: ROUTINE 

THIS  DOES  SOME  BIT-PERMUTING... 

SEE  THE  NEW  APPLE  MANUAL  FOR  EXPLANATIONS. 
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All  right  you  Atari  owners.  You've  had  those 
machines  long  enough  to  start  cranking  out  some  use- 
ful articles.  Let's  see  some  material  on  getting  those 
nacgubes  ti  "fly"!  Address  your  articles,  reviews, 
and  comments  to  me  at  COMPUTE,  P.O.  Box  5406, 
Greensboro,  NC,  27403.  Please  mark  the  outside  of 
the  envelope  "Attn:  Atari  Gazette".  If  your 
program  listing  is  more  than  20  or  30  lines,  please 
include  a  short  cassette  tape. 

Several  months  ago  I  commented  that  I  expected 
to  see  hardare  vendors  entering  the  Atari  market 
with  competitive  add-ons.  Well,  the  first  non- 
Atari  memory  expansion  board  for  the  Atari  800  is 
now  on  the  market.  We  have  one  here  and  have 
been  using  it  for  over  a  month  with  no  problems. 
Manufactured  and  marketed  by  JACC,  Inc.,  (Just 
Another  Computer  Company,  543  West  Golf  Road, 
Arlington  Heights,  IL  60005,  312-364-6268),  the 
16K  board  sells  for  $179.95.  While  it  docs  not  have 
the  protective  plastic  case  of  the  Atari  memory,  the 
board  plugs  right  in  to  the  expansion  memory  slot 
just  as  the  Atari  produced  boards  do.  My  only 
warning  would  be  that  you  should  be  especially  care- 
ful to  establish  which  side  is  the  front  of  the 
board  before  attempting  to  plug  it  in.  If  you've  been 
looking  for  a  professionally  produced  source  of 
alternate  memory  Ibr  your  Atari,  this  group  seems 
to  know  what  they're  doing.  Watch  them  for  more 
new  hardware  products  for  the  Atari  800.  One  last 
note:  At  the  time  of  this  writing,  we  were  waiting 
to  hear  from  Atari  regarding  their  warranty  and 
JACC's  board.  I'll  update  you  next  time  around.  If 
you  can't  wait,  I  suggest  you  check  with  the  company. 

Robert  Lock,  Editor  ^ 


Review: 

An  Invitation  to  Programming 

(cassette  tape) 

Atari,  Inc. 

Sunnyvale,  CA 

Written  by  Program  Design,  Inc. 

Joretto  Klepfer,  COMPUTE  Staff 

Program  Design  Inc.  has  produced  six  tutorial 
programs  (lessons)  which  invite  you  to  learn  about 
your  new  Atari  400/800  computer  and  the  BASIC 


language.  The  Atari  computers  have  the  capability 
of  recording  a  sound  track  with  a  program  on 
cassette.  PDI  has  taken  advantage  of  this  feature 
and  created  tutorials  which  not  only  use  the  computer 
to  demonstrate  itself  visually  but  also  provide 
corresponding  verbal  instructions.  The  effect  is  much 
more  dramatic  and  lasting  when  you  can  hear  instruc- 
tions while  reading  them  on  the  screen.  The  potential 
use  in  education  of  this  technique  is  fantastic.  The 
tape  is  used  in  conjunction  with  the  BASIC  cartridge 
(CXL4002)  and  the  programs  are  loaded  by  means  of 
the  conventional  CLOAD  command. 

Beginning  with  the  keyboard,  the  user  is  led 
step  by  step  through  the  elementary  concepts  of 
using  the  various  features  of  the  Atari  and  of 
beginning  BASIC.  The  first  two  lessons  each  have 
two  parts  and  include  introductory  items  about  the 
course,  keyboard,  and  computer  language  in  general, 
along  with  error  messages,  line  numbers,  order  of 
program  execution,  and  the  keywords  PRINT,  RUN, 
LIST,  and  NEW.  In  Lessons  Three,  Four,  and  Five 
more  BASIC  statements  and  concepts  are  introduced, 
such  as  variables,  LET  (assignment  statement), 
INPUT,  string  variables,  DIMension,  IF  THEN, 
and  GOTO.  Lesson  Six  is  a  demonstration  of  two 
programs  which  display  sound,  color,  and  graphics 
capabilities  of  the  Atari.  You  can  use  these  pro- 
grams as  building  blocks  for  your  own  experiments 
with  these  concepts. 

The  first  five  lessons  are  written  in  a  tutorial 
style  with  a  set,  you  supply  the  answers  before 
continuing  with  the  lesson.  You  are  given  three 
chances  to  provide  the  correct  answer  and  are  pro- 
perly rewarded  with  a  nice  musical  chord  if  you  do. 
You  receive  no  "reward"  for  incorrect  answers. 

The  programs  have  been  developed  with  the  goal 
of  providing  a  self-teaching  tool  to  the  first-time 
computer  user.  Obviously  you  will  not  find  an  in- 
depth  discussion  of  the  BASIC  language  in  just  six 
lessons,  but  you  will  discover  this  tape  to  be  a  good 
introduction.  Since  the  six  programs  are  loaded 
separately  you  can  easily  set  a  comfortable  pace  for 
learning,  with  sufficient  practice  time  between 
lessons  for  developing  your  programming  skills. 
(Very  important!) 

The  programs  can  be  easily  understood  by  a  wide 
range  of  ages.  Verbal  instructions  make  it  easier 
for  younger  children  to  use  the  lessons,  but,  some 
reading  is  necessary,  and  they  may  need  some  assis- 
tance in  coping  with  the  computer  during  "start-up'.' 
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Adding  A 
Voice  Traci<  To 
Atari  Programs 

John  Victor,  President 
Progronn  Design,  Inc. 
11  Idar  Court 
Greenwicti,  CT  06830 

We  recently  had  a  chance  to  see  the  latest  in 
audio-visual  technology--  a  video  tape  machine  being 
controlled  by  an  Apple  computer.  The  student  was 
shown  selected  film  sequences  on  the  video  tape.  Then 
the  video  tape  would  stop  and  the  student  would  be 
asked  questions  by  the  computer. 

This  demonstration  had  some  impressive  features, 
but  the  most  important  was  the  integration  of  voice 
with  the  computer  question  and  answer  technique. 
The  same  effect  can  be  generated  on  an  Atari  400  by 
combining  text,  graphics,  animation  and  color  with  a 
sound  track  recorded  on  an  audio  cassette.  And  the 
Atari  400  is  significantly  cheaper  and  easier  to  program 
than  the  combination  video  tape  player-computer. 

There  are  several  ways  that  a  software  designer- 
programmer  can  synch  a  cassette  voice  track  to  visuals 
on  the  computer  screen,  The  cassette  player  that  plugs 
into  the  Atari  computer  records  and  plays  in  a  stereo 
format.  The  right  track  on  the  tape  records  and  plays 
digital  information  (such  as  programs  or  data  files), 
while  the  left  track  plays  audio  recordings.  The  "Talk 
And  Teach"  ROM  and  tapes  supplied  with  Atari 
computers  use  both  tracks  simultaneously.  As  the  voice 
explains  material,  ASCII  characters  are  read  off  the 
digital  track  and  shown  on  the  screen.  The  two  are 
coordinated  in  the  manufacturing  process  so  that  they 
are  always  synchronized. 

The  problem  with  the  "Talk  And  Teach" 
system  for  the  average  Atari  owner  is  that  the  develop- 
ment of  the  Talk  And  Teach  cassettes  requires 
different  hardware  than  is  supplied  with  the  Atari  sys- 
tem. In  fact,  the  system  may  be  developed  and  run  on 
non-Atari  equipment--  we  have  seen  the  cassettes 
run  on  a  modified  TRS-80  computer. 

The  simplest  and  most  practical  method  for  Atari 
users  to  synch  voice  with  their  own  educational 
programs  is  to  use  a  "timed-BASIC"  method.  The 
visuals  are  programmed  into  a  BASIC  program  and 
run  simultaneously  with  an  audio  tape  cassette.  The 
program  would  then  start  and  stop  the  Atari  cassette 
player  and  change  the  visuals  on  the  TV  screen  based 
on  timing  routines  built  into  the  program.  The  key  to 
making  this  system  work  is  that  the  audio  tape  must 
start  at  the  same  point  each  time  it  is  used. 


The  computer  course  designer-programmer  first 
writes  a  script  as  though  he  or  she  were  producing 
a  sound-film  strip  presentation.  The  spoken  words, 
music,  etc.  would  be  specified  along  with  a  detailed 
description  of  what  is  to  appear  on  the  TV  screen.  The 
designer-programmer  then  writes  a  BASIC  program 
that  will  produce  the  desired  visual  effects. 

The  next  step  is  to  coordinate  the  voice  with  the 
visuals.  The  best  way  to  do  this  is  to  have  a  prelimi- 
nary routine  within  the  computer  "freeze"  each  screen 
display  until  the  programmer  hits  the  'RETURN'  key. 
This  can  be  done  by  sending  the  program  to  an 
INPUT  subroutine,  but  this  has  the  undcsired  side 
effect  of  printing  an  extraneous  question  mark  on  the 
screen.  We  prefer  using  the  subroutine  shown  below 
since  it  prints  nothing  at  all  on  the  screen: 

5000  IF  PEEK(764)<>255  THEN  POKE 
764,255  :RETURN 
5010  GOTO  5000 
Memory  location  764  indicates  whether  a  key  has  been 
pressed.  If  no  key  has  been  pressed,  the  number  255 
will  be  stored  there.  When  a  key  has  been  pressed,  the 
routine  sets  the  value  back  to  255  (to  keep  the  computer 
from  printing  the  key  press)  and  the  program  returns 
from  the  subroutine. 

The  designer-programmer  should  read  through 
the  script  and  manually  check  the  screen  changes  to 
see  that  the  BASIC  program  and  the  script  match  up 
and  produce  the  desired  results. 

The  third  step  is  to  place  timing  routines  into 
the  program  so  that  the  visuals  will  be  in  synch 
with  the  recorded  voice.  We  do  NOT  recommend 
using  FOR... NEXT  timing  loops  for  these  routines. 
FOR... NEXT  loop  timing  is  not  linear  on  the  Atari. 
This  means  that  the  Atari  might  take  one  second 
to  count  from  1  to  300  in  one  loop,  and  less  time 
to  do  the  same  count  in  another  loop  of  different 
length.  In  addition,  the  length  of  the  program  and 
position  of  the  subroutine  also  affects  the  count. 

Fortunately,  the  programmer  can  utilize  a  built-in 
clock  used  by  the  Atari  computer  to  count  the  scan 
lines  in  the  TV  display,  which  are  stored  in  memory 
locations  18,  19  and  20.  Location  20  counts  in  "jiffies" 
or  1/60  second.  Each  1/60  increases  the  value  stored 
in  location  20  by  1.  When  the  count  reaches  256, 
the  value  is  cleared  to  0  and  location  19  is  incre- 
mented by  1.  It  takes  the  computer  about  4.27  seconds 
to  count  from  1  to  256  in  location  20,  and  about  18.2 
minutes  to  count  from  I  to  256  in  location  19.  You  can 
watch  this  process  with  the  following  program: 

10  PRINT  PEEK(20),  PEEK(19),  PEEK(18): 
GOTO  10 

The  results  from  these  PEEKs  could  be  converted  to 
seconds,  but  we  prefer  to  work  in  jiffies,  which  requires 
less  math  on  the  computer's  part. 

SECONDS  =  (PEEK(19)*256  +  PEEK(20»/60 
JIFFIES  =  PEEK(19)*256  +  PEEK(20) 
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We  recommend  at  this  point  that  the  designer-pro- 
grammer make  the  final  audio  cassette  that  is  to  go 
with  the  computer  program.  The  program  can  be 
timed  to  this  cassette,  and  if  all  copies  of  the 
cassette  can  be  made  to  use  the  same  starting  point, 
then  the  program  will  work  with  ail  copies  as  well. 

The  task  now  is  to  figure  out  the  timing  for 
each  change  so  that  the  changes  will  be  made  in  synch 
with  the  audio  cassette.  Figure  I  shows  a  program 
that  we  developed  to  automatically  make  these 
measurements  for  an  audio  tape.  The  user  puis  the 
audio  tape  in  the  Atari  cassette  player  and  rewinds 
it  to  the  very  beginning.  With  the  play  button  de- 
pressed, the  user  runs  the  program.  Line  20  starts 
the  cassette  player,  and  the  program  begins  timing. 
At  each  point  where  the  user  wishes  the  computer 
to  change  the  visual  {in  conjuction  with  the  voice), 
the  user  hits  the  'RETURN'  key.  At  the  end  of  the 
program  the  cassette  is  shut  off,  and  the  user  is  given 
the  times  between  each  point  on  the  voice  track  where 
the  computer  is  to  change  the  visual. 

The  user  should  note  that  memory  locations  19 
and  20  are  set  back  to  0  after  each  timing,  and  that 
line  55  looks  specifically  for  an  input  from  the 
'RETURN'  key.  This  program  counts  up  to  15 
changes,  but  this  number  can  be  increased  by  increas- 
ing COUNT  in  lines  40  and  100. 

The  last  step  is  to  insert  the  time  values  into 
the  computer  program  and  to  check  to  see  that  the 
voice  cassette  works  in  synch  with  the  program.  Figure 
2  shows  a  program  that  we  wrote  to  illustrate 
how  timing  values  can  be  coordinated  with  a  teaching 
program  and  audio  tape.  Line  50  of  the  program  de- 
fines the  subroutines,  of  which  there  are  three:  one 
to  print  questions  on  the  screen,  one  to  time  the 
visual  so  that  the  voice  on  the  tape  can  read  the 
question,  and  one  to  shut  off  the  tape  so  that  the 
student  can  answer  the  question  just  asked. 

The  QUESTIONASK  subroutine  in  lines  4000- 
4030  gets  its  information  for  each  question  from  a 
DATA  line,  which  includes  question  number,  screen 
color,  answer  to  the  question,  number  of  lines  to  be 
read,  and  the  fines  of  text  making  up  the  question. 
After  printing  the  question,  the  program  sets  the 
time  value  for  the  voice,  and  goes  to  the  clock 
subroutine  at  5000-5020.  When  the  correct  time 
elapses,  the  program  goes  to  the  QUESTION- 
ANSWER  routine.  Here  the  tape  is  shut  off,  and 
the  user  is  required  to  answer  the  question.  Upon 
answering,  the  tape  is  turned  back  on. 

The  time  values  in  this  program  are  based  on 
our  own  personal  reading  of  the  questions. 

While  it  is  possible  to  record  both  programs  and 
audio  on  the  same  cassette  and  still  utilize  the  method 
we  have  described  here,  the  best  way  to  record 
programs  and  audio  separately.  IdcaUy,  the  programs 
would  be  stored  on  disk  and  the  voice  on  cassette. 

It  is  possible  that  whh  very  long  audio  cassettes 


the  computer  and  tape  will  get  out  of  synch  due  to 
small  variations  of  the  cassette  player.  The  designer- 
programmer  can  correct  for  this  by  occasionally  having 
the  student  press  'RETURN'  when  he  or  .she  hears 
a  beep  on  the  audio  track.  This  gives  a  frame  of 
reference  for  the  program  timing  to  match  up  to  the 
tape.  The  least  obvious  way  of  doing  this  i.s  to  have 
the  student  press  'RETURN'  before  answering  a 
question. 

FIGURE  1 

5  REM  TIMIM:  PROGRAn  B*/  ..fOHH  UICTOT: 

6  REM  FOR  ATARI  COMPUTER  '.lOICE  TRACK 
16  DIM  Tir€(15).Hl(l) 

20  POKE  54018..  52  :REn  TURU  ON  CASSETTE 

30  GRAPHICS  S^POSITIOM  2,.€ 

35  PRINT  "START  COLWTIhJG.  . ." 

40  FOR  COLffr=l  TO  IS^S-ETCOLOR  2..  UTTCRHD'; 

l)*i5).4 

50  POKE  19. STROKE  28.-0 

55  IF  PEEKC 764)012  THEN  55 

60  JIFFY=256tPEEK<:  19)+PEEK(20)^TIME(COUW 

T)=JIFFY^ PRINT  "CHANGE  #". COUNT 

?3  POKE  764  ..255 

75  NEXT  COUNT 

78  POKE  5401S,be=REn  SMJT  OFF  CASSETTE 

80  PRINT  =  PRINT  "PRESS  RETURN  TO  SEE  Tir^ 

E  liALLES  IN  JIFFIES" 

90  INPUT  H$ 

100  FOR  ODUf-rr=I   TO  15^ PRINT  "CHANIE  #".;C 

OIKT i  "=" .;  T IMEC  COUNT )  ■  h€KT  COUNT 

200  END 


FIGURE  2 

10  REM  CeiCHSTRATIOW  OF  ATARI  Tlhlh€ 

28  REM  FOR  TirTORIALS  USING  LiOICE  AhCt 

30  REN  TIMING  LOOPS 

40  REM  PROGRAfI  DESIGN.   IfC. 

50  CLKK=5000  =  QUESTIOHASK=4000  ■  QIESTIONA 

NSWER=3000:REf1  SUBROUTI^€  LABELS  AND  LOC 

ATIOHS 

60  DIM  ANSl€Rf ( 18).. RESFillSE*-:  1 0 ).U\EP:  4 

0> 

100  GR(¥^^ICS  2+16^Pa5ITiriN  0.2  =  PRIMT  #6; 

"       BASIC  TUTORIAL"^ PRINT  #6.;"       DEmHST 

RATION"  :PRIhn'  #6 

105  PRINT  #6; "         with  wice" 

110  TIt€=300^GOSU8  aOCK 

200  GRAPHICS  0^ PRINT   ^ PRINT 

205  PRIhrr  "This  is  a  cternonstration  of  th 

e  ATARI" ^ PRINT  "computer's  ability  to  ut 

ilize  a," 

2&£  PRIhfT  "sound-.,'oice  track.     I  will   as 

k  four"=PRIh^  "saniple  -=iuastion5  about  AT 

rt?I  BASIC.  "^PRINT 

207  PRINT  "Place  audio  cassette  m  playe 

r  and"=PRINT  "r&>nnd  to  besinnins.  "^PRIN 

T 
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210  PRIHT  "Before  str^rtins  this  ijefncrtstr 

ation^ " 

215  F'RIhfT  "make  sure  that  the  PLhY  botto 

n  is° 

228  PRINT  "pressed  dotin  on  your  cassette 

player. " 
230  PRIhfT   ^ PRINT   ^PRIhfT  "PRESS  RETLIPIJ  TO 

START.  "ahRIT  RESPOh^Ef 
250  POKE  5401S>52^REM  STARTS  ThPE 
300  GOSUB  QUESTI0NASKair€=1274:CBSllB  CL 
OCK^GOSiJB  QtJESTIf>^HHSl.iER 
310  GOSUB  Ql£STIiDNHSKTiriE=bSl:GOSLE;  CLO 
CK:  GOSUB  QUESTIONANSIJFR 
320  GOSUB  QU£STI0NHSK>TirE=£33^G0SUe  CLO 
CK: GOSUB  QUESTIONhNSICR 
330  GOSUB  i3UESTIl>JA.Sh^TIf1E-30^3^GO^Je  CLO 
CK  ■■  GOSUB  iSUEST  I  CffttHSlCR 
346  GOSUB  QUESTI0hiH.SK:TiriE=b?3^G0::.UB  CLO 
CK^  GOSUB  QUESTICWANSl'ER 
400  GRAPHICS  l^SETDLOF:  2..e..  H-dETCOLOR 
4.0,14  =  POSITION  0.y:pRINT  #£,; "         END  OF 

DEHO  "=TirE=392  =  GOSUB  CUXK 
410  P0I<:E  54018..  69^  REM  'SHUT  OFF  CftSSETTE 
500  GRAPHIilS  d--Em 


6010  DATA  2.10..2.LIST4'4.at  cortunarKl  will 
show  you  the  pro-..9rain  stored  in  tlie  cotvi 
puter  (d&ttor^? 

6020  DATA  3. 1.2.RLJL.l-l-,at  command  execute 
s  a  pr osra/ii  iruthe  coniPLit-er '  s  rneiviory? 
6030  DATA  4.3..3..CSAl!E..l-f.at  is  the  most  c 
ofiMRonly-used  hThRL.B^IC  coiMiand  Ljsed  to 
record  prc«'-aflis..to  cassette  tape? 
6840  DATA  5. 14.2.t€l'J,.Hnat  comrftafTd  wipes 
out  the  PTOsramjin  (nemcry? 


COMPUTE  reeds  you!  Let  us  know 
what  interesting  applications 
you're  coming  up  with  tor  your 
Atari. 


^99  REN  A^e'ERI^■IG  SLE;ROUTINE 

3000  PiJKE  54018.60^  REM  SHUTS  OFF  CASiETT 

E 

3010  PRINT   : PRINT  "VOIF  ftHS:WER  IS  ".^W 

UT  RESPONSE* 

3020  IF  RESPONSE$=ANSl€Rf  THEN  PRINT  CHR 

*(  253:- PRINT  ^F-RINT  "CORRECT !"  ^  GOTO  3103 

3040  PRINT  ^ PRINT  "NO..  THE  ANSICR  IS  ";h 

MStCRI 

3100VrINT   -PFIINT  "PRESS  RETURN  TO  CONTI 

NUE..."=IhPUT  RESPONSE* 

3110  POKE  54018, 5£  =  REri  TURN  CASSETTE  BAC 

K  ON 

3120  RETURN 

3999  REM  QUESTION  SUBR'OUTINE 

4008  GRAPHICS  0  =  READ  MJMBER..  COLOR.  LINES.. 

ANSWER* 

4810  SETCOLOR  2.C0L0R.4^F'RIHT  ^ PRINT  =PR' 

INT  "QUESTION  #"; NUMBER^ PRINT   ^PR'IfrT 

4020  FOR  COLINT=i  TO  LlhCS^READ  LINE*  ^PRI 

NT  LINE^^hE'fr  COUNT 

4030  RETURN 

4999  REM  TIMI^C  LOOP 

5000  POKE  19.0  =  P»:E  20 ..0  =  REM  SETS  aOCK 
TO  0 

5010  IF  PEEK(19>«256+PEEKC20KTIME  THEN 

5010 

5020  RETURN 

6000  DATA  1..5,3,CL0AD..l-*iat  is  the  usual 
BASIC  coflicnand  to /tell  t[;e   coitiputer  to  lo 
ad  a  prosr^am..  from  cassette  tape? 


NOW  AVAILABLE 

for  the  ATARr"" 


WORD-SCRAMBLE 

(8K  BASIC)  Reading  and  spell- 
ing aid,  A  robot  prints  the  letters 
for  the  child  to  unscramble. 
Contains  the  most  frequently 
used  words  in  Prinnar^'  Readers 
(grades  1-4) cass  SI 5.00 

WORD-/v\ATE 

( 1 6K  BASIC)  Build  compound 
words  with  the  words  that  have 
been  dealt  to  you.  Tp,'  to  make 
more  compound  words  than 
the  computer  Don  t  get  stuck 
with  the  last  card, 
(grades  3-6 1 cass.  SI 5.00 

nSHING  for  HOMONYMS 

( 16K  BASIC)  P!ay  the  popular 
game  of  F^SH  with  the  compu- 
ter This  time  ask  for  homonyms 
to  the  W'ord-cards  that  appear  in 
your  hand, 
(grades  3-6) cass.  S I  5,00 


WATiTED 

( 1 6K  BASIC)  ■  Be  a  detective 
and  track  down  the  words  that 
have  escaped  your  vocabulary. 
Clues  appear  on  the  screen  in 
the  form  of  a 'WAITED'  poster, 
(grades  4-8) cass.  515.00 

GUESSWORD 

|8K  BASfCl  ■  Based  on  the  VJ 
show  Password,  the  computer 
gives  clues  to  the  secret'  word 
The  sooner  you  can  guess  the 
word,  the  higher  your  score.  For 
one  or  tu'O  players, 
(grades  6-).  .  ,  ,    cass.  SI  5.00 


COMING  SOON. . . . 
PRESCHOOL  fUK 
MATH  FACTS  I 
CRIBBAGE 


i\H.E.S.I.S. 

PC,  Box  147 

Garden  Cit\.  Ml  48135 

orcalli313i  5954722  forCQD 


IT 


Please  add  SI  50  for  shipping 

WRITE  for  FREE  FLYER 

DE.ALER  ir^QCJIRIES 

WELCO.ME 
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The  Basics  Of 
Using  "Poice" 

in  AfOri  Charles  G,  Fortner 

Graphics 

In  order  to  use  the  poke  statement  in  Atari  graphics, 
we  must  first  know  two  things: 

1)  Where  to  poke 

2)  What  to  poke 

To  determine  where  to  poke,  we  must  look  at  the 
display  list  for  each  graphics  mode.  This  display 
Hst  is  found  by  peek  (560)    +  peek  (561)  *256.  The 
display  li.st  determines  how  the  memory  is  displayed 
on  the  screen.  The  5th  and  6th  byte  of  the  display 
list  hold  the  address  of  the  first  byte  to  be  displayed. 
Table  l-I  gives  the  starting  address  for  each  graphics 
mode  plus  other  information. 

Determining  what  to  poke  involved  trial  and  error 
with  the  following  results: 

l)Graphics  Modes  3,  5,  7,  19,  21,  23 

These  modes  arc  four  color  modes  which  display 

only  four  pi.xcls  for  each  eight  bit  byte  of  memory 

displayed.  Bits  7  and  6,  numbered  a.s  7-6-5-4-3-2- 1-0, 

determine  the  color  of  the  first  (left  most)  pixel; 

bits  5  and  4  the  second;  3  and  2  the  third;  and  1  and  0 

the  fourth.  The  two  control  bits  act  as  a  "COLOR" 

statement  for  each  pixel.  If  the  he.x  value  of  the 

two  control  bits  equals  0  it  corresponds  to  a  "COLOR 

0"  statement;  if  they  equal  1,  they  correspond  to  a 

"COLOR  1"  statement,  etc. 


2)  Graphics  Modes  4,  6,  20,  22 

These  modes  are  two  C(jlor  moties  wiiich  display 
eight  pixels  for  each  eight  bit  byte  of  memory.  Each 
bit  acts  as  a  "COLOR"  statement  for  an  individual 
pi.xel.  A  I  in  a  location  corresponds  to  a  "COLOR 
1"  statement  and  a  0  corresponds  to  a  "COLOR  0" 
statement. 

3)  Graphics  Mode  8,  2,  4 

These  modes  are  high  resolution  modes  with  only 
one  color.  They  display  eight  pixels  per  memory 
byte  with  a  "1"  bit  displaying  a  pixel  of  the 
same  color  as  the  background  but  with  a  higher 
luminance.  A  "0"  bit  displays  a  pixel  of  the  same 
color  and  luminance  as  the  background. 

The  "COLOR"  statements  mentioned  in  the  above 
explanations  indirectly  control  the  color  of  each  pixel 
by  determining  which  color  register  is  active  Ibr  an 
individual  pixel.  The  exact  manner  a  "COLOR" 
statement  chooses  this  register  is  explained  in  Table 
9.5  of  the  Atari-Basic  Reference  Manual. 

Here's  an  interesting  program  to  get  started  in 
graphics: 

References:  "Atari  400/800  Basic  Reference  Manual", 
Copyright  1980,  Atari,  Inc. 


10  GRAF-HICS  5 

26  ftDDR=PEEKC  560  HPEEK<  561  'y^25£ 

30  rt]OR=PEEK(  hDOR+4  )+PEEK<  hDDR+5  >*25b 

40  B=IHT'::R^Ci<;0vi'.SSS>:REM  - 

PICK  A  mmn  byte  ih  disf-lay 

50  R=IHT(RH0(y)i;-255>^R£n  - 
PICK  RAtCiOM  i^ALUE  BETIOEEN  y  HtJO  £55 
60  f\ME  PCOR+B.-R  REM  - 

P0K".E  mmn  uhlue  u-mj  miom  she 

70  GO  TO  40 


TABLE  1-1 


BITS 

)POF 

GRAPHICS 

DISPLAY 

#OF 

#  OF 

BYTES 

DISPLAYED 

COLORS 

MODE 

DATA  ADDR. 

ROWS 

COLUMNS 

PER  ROW 

PER  BYTE 

AVAILABLE 

3 

24i7f) 

20 

40 

10 

4 

4 

4 

2X136 

40 

80 

10 

8 

2 

5 

2345  (i 

40 

80 

20 

4 

4 

6 

2249ti 

80 

160 

20 

8 

2 

7 

2(1576 

80 

160 

40 

4 

4 

8 

NOTE  I 

160 

320 

40 

8 

1 

19 

24176 

24 

40 

to 

4 

4 

20 

23936 

48 

80 

H) 

8 

2 

21 

23456 

48 

80 

20 

4 

4 

22 

22496 

96 

160 

20 

8 

2 

23 

20576 

96 

160 

40 

4 

4 

24 

16720 

192 

160 

40 

8 

1 

NOTE  #1:  Graphics  Mode  8  has  two  addresses  -  16720  is  thc 
starlitig  adchfss  for  the  first  BO  lirn:s  and  204H0  is  the  starting 
address  for  the  sccorKi  80  lines. 
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A  Note  on  "The  Basics  of 
Using  "POKE"..." 

Robert  Lock 


SOFTWARE  FOR  THE 

ATARI®400/800 


Larry  rewrote  the  original  program  that  Charles 
sent  in  so  it  will  adjust  itsell'  to  your  machines 
memory.  Alter  you  try  the  program  in  the  article, 
take  a  look  at  these.  I  expanded  them  to  randomly 
alter  the  SETCOLOR  parameters...  you'll  discover 
some  of  the  versatility  of  your  machine  after  you  let 
the  program  run  for  five  minutes  or  so. 

10  GRAPHICS  23 

20  hDOR=PEEK:':  56m  >+PE&:-:  561  J'^^SSS 

30  ACOR=P£EK<  ADDR+4  )+PEEK(  AODR+5  ):^256 

35  I=INT<RH[>;0)*16> 

36  J=INT<RH&::0)*i6) 

37  K=IHT(R^O;:e>:*;5:? 

38  StTCaOR  K..J..I 

48  E;=IHT(i^D::0)*3y4y)^F£M  - 

PICK  A  RAHDOM  BYTE  IH  DI:5Fi_AY 
50  A=IHT<RhD':0>*.255):RB-l  - 

PICK  Rftt-OH  I...W.IJE  BETWEEN  0  AND  255 
68  PiJKE  rDOR+B.A^REM  - 

Pa<:E  RAhCHJM  ItALUE  INTO  RANuijn  E:VTE 
70  GOTO  35 


10  GR<:fHICS  7 

20  ADDR:=PEEK(  566  :'+P£EK<  561  >*256 

30  lHOOP:=PEEt<;:(  ADDR+4  )+PEEK(  rDDR:+5  >:^'256 

35  I=IHT<RtCK8>;^t6> 

36  ->IHT<RtO>J>tl6) 

37  K=INT(RtCi>;8y*5> 

38  SETCCLuf.:  K,.J.  I 

40  B=IHT(RHD<0;4;320y>^REM  - 
PICK  A  RAhD'JM  BYTE   IN  DISPLAY 

50  fH=IHT(RHD(y;'^:255)^REh  - 
PICK  mHu\y\  I.JALLE  BETL4EEN  y  AND  2-55 

60  PUK.E  ADOR:+B..A^REM  - 
POfCE  R^-OJt1  ItALUE  INTO  PArCnjri  B'YTE 

78  GOTO  35 


The  programmers  at  Quality  Software"  have  worked  for  several 
months  with  the  ATARI  800  and  find  it  to  be  an  excellent 
computer  with  outstanding  features.  Now  we  offer  important 
software  to  owners  of  the  ATARI  400  and  800.  All  programs  are 
on  cassette.  Only  8K  RAM  required. 

*  *  *  *  • 

ASSEMBLER  by  Gary  J.  Shannon,  Create  your  own  6502  machine  language 
programs  with  this  easy-to-use  m-RAM  edilor/assembler.  Look  at  the  features 
you  gel  for  less  than  $25! 

•  Insert,  delete,  edit  source  cede  lines 

•  Save  source  code  on  cassette 

•  Save  object  code  (any  part  of  memory)  on  tape 

•  Prmt  out  assemblies 

•  View  and  modify  memory 

•  Pseudo  Ops:  0RG.0!3J.EQU.HEX,ASC,DA.DS,END 

•  All  6502  mnemonics  plus  BLT.BGE 

•  Commentmg  allowed 

•  Error  checking 

•  Fully  dccumented,  with  examples 

•  Price  -  $24.95 

e502  DISASSEMBLER  by  Bob  Pierce,  This  neat  8K  BASIC  program  allows  you  to 
disassemble  machine  code  and  print  out  the  disassembled  listings.  If  you  have 
more  than  8K  of  memory,  programs  m  RAM  can  be  disassembled.  ROM  can  be 
disassembled  on  any  size  Atari,  $11.95 

FASTGAMMON'"  by  Bob  Christiansen, 
The  most  popular  t)ackgamn]on  playing 
game  for  personal  computers  is  now 
available  for  the  Atari.  Written  in 
machine  language,  but  loads  with  a 
simple  CLOAD  and  RUN  This  is  the  best- 
pfaying  version  so  far.  Eigfitpage 
instruction  manual  includes  the  rules  of 
backgammon.  $19.95 

***** 

AVAILABLE  SOON:  PROGRAMMER'S  HANDBOOK  FOR  THE  ATARI  400/800. 
Written  by  Quality  Software,  This  book  gives  you  valuat)le  information  about  the 
software  built  into  your  ATARI  computer.  For  example,  it  sfiows  you  how  to  use 
some  Monitor  subroutines  by  a  USR  call  from  BASIC,  gives  the  format  of  BASIC 
statements  as  they  are  stored  m  memory,  and  explains  how  keyboard  inputs, 
ASCII  codes,  and  video  codes  are  related.  All  of  this  material  is  clearly  stated,  and 
many  examples  are  provided  both  in  assembly  language  and  in  BASIC. 

$14.95 


QUTILny  SOFTW:qR€ 

6660  f^esedo  Blvd.,  Suite  105,  Reseda,  CA  91335 
Telephone  24  firs..  7  dovs  a  week:  (213)  344-6599 


WHERE  TO  GET  IT:  Ask  your  nearest  Atari  dealer  [a  see  Quality  Software's  Mai 
programs.  Or,  if  you  prefer,  you  may  order  directly  from  us.  MasterCharge  and 
Visa  cardholders  may  telephone  their  orders  and  we  will  deduct  S I  from  orders 
over  $19  to  compensate  for  phone  charges.  Or  mail  your  order  to  the  address 
above,  California  residents  add  6"u  sales  tax.  Shipping  Charges:  Within  North 
America  orders  musi  include  $1  50  for  first  class  shipping  and  handling.  Out- 
side North  America  the  charge  for  airmail  shippmg  and  handling  is  $5,00, 
payable  in  US,  currency, 

AIARI.  ATARI400,  anij  AIARI80O  tiane  been  tiademjfked  by  Alan  Personal  CompuiEr  Syslemv  i  Warnei 
CommLjnicalion^  Company 
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Color  Wheel 
for  the  Atari  ho^s 

The  Color  Wheel  program  was  written  to  experi- 
ment with  some  of  the  Atari's  color  graphic  capabili- 
ties. The  screen  clears,  and  a  series  of  lines  radiate 
from  the  center  of  the  screen  in  random  colors, 
forming  a  shape  with  the  outline  of  an  ellipse.  As 
the  color  bands  sweep  the  screen,  the  colors  shift  in 
intensity  and  hue,  forming  a  constandy  changing  set 
of  contrasts  and  shapes. 

The  program  itself  is  quite  simple,  thanks  to 
the  easy  Atari  BASIC  graphics  commands.  Graphics 
mode  7  features  160  by  80  points  of  resolution  in 
four  colors,  which  are  set  up  in  registers.  One  of  the 
things  that  made  this  program  possible  was  that 
you  can  change  a  color  register  value,  which  causes 
all  points  on  the  screen  associated  with  that  register 
to  change  color  instantly. 

Line  100  selects  degree  mode  for  trigonometric 
functions,  which  in  this  case  leads  to  less  messy 
numbers  in  the  FOR-NEXT  loop  in  line  140.  Lines 
120  and  130  select  values  for  DX  and  DY,  which 
determine  the  shape  of  the  ellipse  for  that  cycle. 
The  STEP  in  line  140  was  added  because  the  smaller 
ellipses  otherwise  took  the  same  time  to  draw  as 
bigger  ones.  Line  145  randomly  selects  the  color 
register  for  the  current  line  (an  interesting  variation 
is  to  move  this  line  to  line  135,  making  each  ellipse 
a  solid  color).  Line  150  plots  a  point  at  the  center 
of  the  screen.  The  formula  in  the  DRAWTO  in  line 
160  was  arrived  at  by  using  simple  trigonometry  to 
determine  the  point  on  the  ellipse  at  any  given  angle 
around  the  center.  The  SETCOLOR  statement  in 
line  180  changes  a  random  color  register  on  the 
screen  to  a  random  hue  and  intensity,  and  is  selected 
30%  of  the  time  by  line  170.  Line  190  completes 
the  loop,  and  200  allows  the  program  to  select  a  new 
ellipse  shape  and  keep  drawing.  I  usually  put  some 
PRINT  statements  between  lines  110  and  120  for  a 
message  in  the  text  window. 

This  program  provides  a  nice  way  to  have  the 
Atari  show  off  its  nice  range  of  colors,  and  the  plotting 
routine  has  been  reduced  to  its  bare  essentials. 

100  DEG 

110  GRAPHICS  7 

120  DX  =  INT(RND(1)'80) 

130  DY  =  INT(RND(I)*40) 

140  FOR  L  =  0  TO  360  STEP  (140-DX-DY)/20 

145  COLOR  INT(RND(1)*5) 

150  PLOT  80,40 

160  DRAWTO  80  +  DX'SIN(L),40  +  DY*COS(L) 

170  IF  RND{1)>  .3  THEN  190 

180  SETCOLOR  INT(RND(1)M),  INT(RND(1)*16), 

INT(RND(1)*8)'2 

190  NEXT  L 

200  GOTO  120 


Because  the  Atari  starts  playing  with  the  colors  if 
the  system  editor  doesn't  do  anything  for  a  few 
minutes,  it  is  a  good  idea  to  PRINT  something 
at  line  195.  An  up  arrow  should  work  just  fine, 
and  not  tamper  with  the  display  in  any  way.  The 
high  resolution  graphics  is  controlled  by  the  screen, 
while  the  editor  is  running  the  text  window.  At  least, 
that's  what  I  think  is  happening.  © 

Choose  Your 

wOy  0¥ ICIC   Len  Lindsay 

A  joystick  is  just  about  standard  equipment  for  all 
ATARI  computer  users.  Most  games  will  probably 
use  it  for  input  of  moves.  Every  ATARI  program  I 
have  seen  thus  far  TELLS  you  where  to  plug  your 
joystick  (the  program  looks  only  at  that  one  spot  for 
your  move).  That  means  that  you  must  continually 
change  which  plug  your  joystick  is  in,  or  trade  joy- 
sticks with  your  friend  in  order  to  switch  players. 
This  is  unfortunate,  for  it  takes  only  a  very  few  lines 
in  BASIC  to  allow  you  to  use  whatever  joystick 
plug  you  wish.  Here  is  the  routine: 

20000  ZJ  =  99 

20010  FOR  Z1  =  0  T0  3 

20020  IF  STRIG(Z  1)  =  0  THEN  ZJ  =  Z 1 

20030  NEXT  Zl 

20040  IF  ZJ>3  THEN  20010 

20099  RETURN 

That  is  all  there  is  to  it  (lines  20010  &  20020  can  be 
combined,  as  can  20030  &  20040).  It  is  a  very  easy 
to  use  routine.  Simply  use  a  line  like  this: 

500  PRINT  "HIT  YOUR  FIRE  BUTTON  TO 
BEGIN":GOSUB  20000 

Now,  all  input  via  joysticks  is  taken  like  this: 

900  MOVE  =  STICK(ZJ) 

If  all  game  programs  used  this  type  of  routine,  you 

would  never  have  to  unplug  your  joystick.  The  ATARI 

is  a  smart  computer,  why  not  use  it  to  its  fullest?  © 


Star  Fleet  to  All 
Cruisers... 


Who's  the  current  champ  o\'  Star  Raiders?  Send 
in  your  best  score,  comments  and  j)laying  strate- 
gies to  COMPUTE,  P.O.  Box  5406,  Greensboro, 
NC  27403. 
Attn:  "Atari  Gazette" 
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Input/Output 
On  The  Atari 

Larry  Isaacs,  Associate  Editor 

In  this  article  I  will  try  to  explain  how  to  use  the 
various  BASIC  commands  at  your  disposal  to 
communicate  with  the  peripheral  devices  in  your 
system.  These  peripheral  devices  include  the  Screen 
Editor  (E:),  keyboard  (K:),  and  TV  Monitor  (S:),  all 
of  which  arc  part  of  your  machine.  External  devices 
which  are  currently  available  include  disk  drives 
(Dl:  through  D4:),  printer  (P:),  and  cassette  (C:). 
The  I/O  (Input/Output)  commands  we  will  be  discus- 
sing are  the  PUT,  GET,  PRINT,  INPUT,  XI05, 
XI07,  XI09,  and  XIOll  commands.  Also,  the  dis- 
cussion will  be  limited  to  the  use  of  these  commands 
as  it  relates  to  logical  files. 

Before  we  get  into  details,  there  are  two  impor- 
tant facts  to  remember.  The  first  one  is  that  these 
I/O  commands  result  in  the  transfer  of  one  or  more 
bytes  of  data,  and  that  often,  these  bytes  will  be 
ATASCII  characters.  The  second  fact  is  that  the 
byte  or  bytes  which  get  transferred  will  be  the  same 
regardless  of  the  device  with  which  you  are  communi- 
cating. 

OPEN  AND  CLOSE 

Before  you  can  communicate  with  a  peripheral  de- 
vice, it  must  first  be  "opened",  and  in  the  case  of  the 
disk,  a  file  name  provided.  The  syntax  of  the  open 
command  is  as  follows: 

OPEN  #iocb,mode, 0 , ' ' devicetname. ext" 

iocb  -  I/O  Control  Block.  This  should  be  an  arithmetic 

expression  which  evaluates  to  a  number  from  1  to  7. 

It  specifies  the  I/O  Control  Block  through  which 

BASIC  will  send  its  requests  to  the  I/O  software. 

mode  -  This  should  be  an  arithmetic  expression 

which  evaluates  to  4,  6,  8,  9,  or  12.  For  now  we 

will  just  be  using  4,  8,  and  12.  Their  meaning 

is  as  follows: 

4   =  open  for  reading 

8    =   open  for  writing 

12   =  open  for  reading  and  writing 

device  -  This  should  be  a  letter  which  identifies 
which  device  to  associate  with  the  I/O  Control  Block 
specified  previously. 

name  -  This  should  be  a  name  of  up  to  six  alpha- 
numeric characters,  the  first  of  which  must  be  a 
letter. 

ext  -  This  is  an  extension  to  the  name  which  is 
usually  used  to  indicate  the  type  of  file,  BASIC 
program,  data,  etc.  It  may  include  up  to  three 
alphanumeric  characters.  The  name  plus  extension 
form  the  file  name  which  is  needed  when  communicat- 
ing with  the  disk. 


Once  you  have  opened  a  device,  you  communicate 
with  that  device  using  the  "iocb"  number.  To  close 
a  device  or  file,  you  use  the  CLOSE  command. 
The  syntax  for  this  command  is  as  follows: 
CLOSE  #iocb 

Only  one  device  can  be  associated  with  an  IOCB  at 
a  time.  If  you  wish  to  associate  a  new  device  with 
an  IOCB  that  is  currently  in  use,  you  must  close 
the  old  device  first.  In  the  case  of  the  disk,  cassette, 
and  the  printer,  a  CLOSE  command  may  be  re- 
quired for  proper  operation.  For  example,  the  disk 
can  only  write  groups  of  128  bytes,  called  sectors, 
which  are  written  once  enough  data  has  been  received 
to  fill  the  sector.  The  CLOSE  command  is  required 
to  cause  the  last  sector  of  a  file,  which  is  only 
partially  filled  with  data,  to  be  written  to  the  disk. 
The  cassette  also  needs  a  CLOSE  command  to  write 
the  last  group  of  bytes.  And  since  the  printer  doesn't 
print  a  line  until  an  EOL  (End  of  Line)  character  is 
received,  a  CLOSE  may  be  needed  to  print  out  the 
last  line. 

If  a  program  terminates  without  error,  or  via  an 
END  statement,  all  open  devices  and  files  will  be 
closed  automatically.  If  the  program  terminates  be- 
cause of  an  error,  due  to  a  STOP  statement,  or 
due  to  the  BREAK  key  being  struck,  the  devices 
and  files  will  be  left  open.  If  you  aren't  able  to 
continue  the  program,  you  may  close  the  devices 
and  files  by  entering  the  necessary  CLOSE  commands 
directly,  i.e.  without  line  numbers.  Also,  executing 
the  RUN  command  will  close  any  open  devices  or 
files . 

Now  we  will  begin  our  discussion  of  the  I/O 
commands.  Many  of  the  examples  make  use  of  the 
disk.  If  you  wish  to  use  cassette  instead,  simply, 
change  the  file  specification  in  the  OPEN  commands 
to  the  cassette  device.  Just  place  a  blank  cassette 
in  the  cassette  player.  Then  whenever  you  hear  two 
beeps,  rewind  the  tape,  press  PLAY  and  RECORD 
on  the  player,  then  hit  RETURN  on  the  ATARI. 
Whenever  you  near  one  beep,  rewind  the  tape,  press 
PLAY  on  the  player,  then  hit  RETURN  on  the 
ATARI. 

PUT  AND  GET 

Lets  look  first  at  the  PUT  and  GET  commands, 
which  are  the  most  basic  of  the  I/O  commands. 
These  two  commands  result  in  the  transfer  of  a  single 
byte,  with  the  PUT  command  sending  a  byte,  and 
the  GET  command  receiving  a  byte.  Here  is  the 
syntax  for  the  commands: 

GET  #fn, variable    where  "fn"  is  a  file  number,  and 
"variable"  is  a  simple  variable,  not  an  array  or 
string  variable 

PUT  #fn,  expression    where  "expression"  is  an 
arithmetic  expression 

Listing  1  provides  an  example  for  using  the  GET 
and  PUT  commands.  In  this  program  the  Screen  de- 
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vice  is  opened  for  reading  and  writing.  This  open 
command  will  also  cause  the  screen  to  be  cleared. 
The  letters  from  "A"  to  "Z"  are  sent  to  the  Screen 
using  the  PUT  command,  and  after  the  cursor 
is  repositioned,  the  letters  are  fetched  back  from  the 
Screen  using  the  GET  command. 

Listing  1 

10  DIM  T$(30) 

28  OPEN  #1.12,0,  "S=": REM  iDPEH  FOP:  R-'W 

38  FOR   I=ASC("A")  TO  rSCX  "2"  > 

40  Fin  #l.I-t-EXT  I 

56  FtKITIOH  PEEK<82>.^^ 

68  FOR  1=1  TO  26  =  GET  #1 .  CHAf^m:TER 

70  T$(  I ..  I  )=CHR-$(  CHARACTER  > 

88  t€>:T   I 

90  GET  #LI=REM  \WE.  CUFSOR  P-ftST  T^t  Z 

100  aosE  #1 

110  PRINT  =PF:INT  T$ 


Listing  2  provides  a  similar  example  which 
communicates  with  a  disk.  Note,  if  you  run  this 
program  a  second  time,  opening  the  file  for  writing 
will  cause  the  old  file  to  be  deleted.  Also,  if  you 
try  to  get  more  bytes  than  were  written  to  the  file, 
an  ERROR  136  (End  of  File  encountered)  will  be 
given.  Changing  the  26  to  27  in  line  60  will 
illustrate  this. 


Listing  2 

16  OPEN  #L 8.0/' DETEST. DAT" 

20  FOR  l=ASC("ft")  TO  ASC<"2' 

30  FUT  #1,I:HEXT  I 

40  CLOSE  #1 

50  OPEN  #L4,0/'D  =  TEST.DAT" 

60  FOR  1=1  TO  26 

70  GET  #1 /CHARACTER 

88  F-RINT  .:CHRf(C.HHF:rtt:TER>.T 

90  heiT  1 

100  aosE  #1 


The  advantage  of  using  GET  and  PUT  is  that 
you  arc  controlling  the  transfer  of  individual 
bytes.  If  this  isn't  necessary,  you  will  likely 
find  it  simpler  and  faster  to  use  one  of  the  following 
I/O  commands.  Each  of  these  commands  involves  the 
transfer  of  a  string  of  bytes. 

PRINT  AND  INPUT 

The  PRINT  and  INPUT  commands  are  used  to 
transfer  a  siring  of  characters.  The  syntax  of  these 
commands  is  as  follows: 

PRINT  #iocb;list  where  the  "list"  is  a  list  of 
expressions  separated  by  commas  or  semicolons.  The 
expressions  may  be  numbers,  strings,  simple  vari- 
ables or  string  variables.  If  a  semicolon  is  used 
prior  to  an  expression,  the  characters  for  this  ex- 
pression will  be  sent  immediately  following  any  pre- 
vious characters.  If  a  comma  is  used  instead  of  a 


semicolon,  including  the  one  shown  in  the  syntax, 
tabbing  will  occur  before  characters  from  the  expres- 
sion are  sent.  If  the  list  doesn't  end  with  a  comma 
or  semicolon,  an  EOL  character  %vill  be  sent  at 
the  end  of  the  list.  If  you  wish,  the  list  need  not 
contain  any  expressions. 

INPUT  #iocb,  list  where  the  "list"  is  a  list  of 
expressions  separated  by  commas.  The  expressions 
may  be  simple  variables  or  string  variables. 

When  printing  strings,  naturally  the  characters  in 
the  string  are  sent.  However,  when  you  print  a 
number,  the  number  is  converted  to  a  string  of 
digits  and  sent  as  ATASCII  characters.  When  you 
input  a  string,  characters  will  be  fetched  until  an 
EOL  character  is  received.  These  characters  will  be 
stored  in  the  string's  reserved  memory  until 
the  reserved  memory  is  filled,  or  the  EOL 
character  is  received.  When  you  input  a  number, 
characters  will  be  fetched  until  an  EOL  character 
or  a  comma  is  received.  At  this  point,  assiuning 
all  the  characters  were  valid  digits,  the  string  is 
converted  back  to  a  number. 

Listing  3  provides  an  example  of  using  PRINT 
and  INPUT  with  the  Editor  device.  Like  the 
Screen  device,  the  Editor  will  print  and  fetch  charac- 
ters from  the  screen  memory.  However,  when  printing 
to  the  Editor,  control  characters  will  perform  the 
associated  function  instead  of  printing  a  character. 
When  you  input  from  the  Editor,  RETURN  must  be 
hit  before  the  Editor  will  begin  sending  characters. 
Also,  the  Editor  remembers  the  line  and  column  of 
the  cursor  when  the  input  request  is  made.  As  long 
as  you  don't  hit  a  cursor-up  or  cursor-down,  the 
fetching  of  characters  from  the  screen  memory  will 
begin  at  this  point  once  RETURN  has  been  hit.  If 
a  cursor-up  or  cursor-down  has  been  hit,  the 
fetching  of  characters  will  begin  with  the  first 
character  of  the  new  line  which  the  cursor  occupies. 
The  fetching  of  characters  will  continue  imtil  the 
last  nonblank  character  of  the  line  occupied  by  the 
cursor  when  RETURN  was  hit.  You  can  explore 
the  operation  of  the  Editor  further  by  making  changes 
to  Listing  3,  and  finding  out  what  happens. 

Listing  3 

10  DIM  T$(8v3) 

20  OPEN  #1.12, 0/'E:" 

30  F-RINT  »l;"123,CHHRhH::TERS" 

40  F-RlNT  #ljaf;*(28>;  =R£I1  m  UP-CUFSOF: 

58  im.IT  #1.T$ 

60  F-RIHT  #ljCrt<t<28).; 

70  ItRlT  #lJ-inE;ER 

80  CLOSE  #1 

90  FlilNT  "T$=";T$ 

100  FlilNT  "MJriBER="jHii-1E£R 

110  REM  JUST  HIT  ffiTURN  UHEN  EACH 

120  REM  iJF  Th€  lif'UT  STATEMENTS 

130  REM  EXECUTES 
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Listing  4  gives  an  example  of  using  PRINT  with 
the  disk.  The  program  reads  back  the  characters 
using  the  GET  command  so  you  can  see  what  was 
sent  to  the  disk  by  the  PRINT  command. 
Again,  you  can  experiment  with  changes  to  this  pro- 
gram to  improve  your  understanding  of  how  these 
commands  operate. 

Listing  4 

10  DIM  TK10) 

20  TI="ABCOEFGHIJ" 

36  T$(5.5)=Chf^(155> 

40  OPEN  #L3.0."E:" 

45  ?  "PRINT  DOES  THIS" 

56  F-RIHT  #1;T$ 

55  ?  -l   "XIO  DOES  THIS" 

68  XIO  9.tl.8.0..TI 

70  CLOSE  #1 


XI09  AND  XI05 

The  XI09  and  XI05  commands,  like  the  PRINT 

and  INPUT  commands,  send  and  receive  a  string  of 

characters.  The  syntax  for  these  commands  is  as 

follows : 

XIO  cmdn,#icob,mode,0,exp 

"cmdn"  is  the  XIO  command  number. 

9   =  PUT  RECORD 

5   =  GET  RECORD 

"iocb"  and  "mode"  have  the  same 

function  as  in  the  OPEN  statement. 

"exp"  may  be  a  string  or  string  variable 

when  writing,  or  a  string  variable  when 

reading. 

The  XI09,  or  PUT  RECORD  command  will  write 
characters  from  the  specified  string  until  an  EOF 
character  is  written.  If  the  string  contains  an 
EOF  character,  the  XI09  terminates  at  this  point, 
and  the  rest  of  the  string  isn't  written.  If  the 
string  does  not  contain  an  EOF  character,  one  is 
appended.  This  differs  from  the  PRINT  command 
where  the  entire  string  is  written  regardless  of 
content.  The  program  in  Listing  5  illustrates  this 
difference. 


Listing  5 

10  DIM  D$<n.T$(4).Ti$(4).T2S(10> 
20  OPEN  #L 8, ©."DETEST. OAT" 
38  XIO  y, #1.8.0."  ABCDEFGHIJK" 
40  CLOSE  #1 

50  Ti$=":«:<:Kxx:<><xx":REh  reset  ti* 

60  Tl$="'fi'YVV":F£t1  rWE  LEMSTH  5 

70  OPEN  #1.4.0,  "DETEST. DAT" 

80   I^fUT  ILT2* 

98  CLOSE  #1 

160  ?  "UfUT  GOES  THIS" 

116  ■'  T2$,LEhKT2l> 

120  T2*=":<'<>^:x:«xxx>:"^F£n  reset  m 

136  T2$="YfT'YY"^REM  nAt(E  LEfCTH  5 


140  OPEN  #1.4,0..  "DETEST, DAT" 

150  XIO  5.#1.4..0.T2$ 

160  CL0:5E  tl 

170  ?  ^?  "XI05  DOES  THIS" 

180  ?  T2$..LEH(T2t;' 

190  T2$(  10,10;-="Z" 

200  ?  T-2$..LEN';:T2*) 

210  ?  "MJTICE  THE  X  ISN'T  t-JRlITTE?'!  iXER" 

220  T$=">0<XX"  :TU="XXXX":T2t="XXX" 

230  OfEH   #1..4,0.."O:TEST.DAT" 

240  XIO  5.#1..4,y.D-| 

250  aO^SE  #1 

260  ?  =?  "i]R  XI05  CAM  DO  THIS" 

270  ?  U-l  Tl$=?  T2$ 

The  XI05  command,  like  the  PRINT  command, 
will  fetch  one  string  and  store  it  in  memory. 
But  where  the  PRINT  command  stops  (when  the 
memory  reserved  for  the  string  variable  is  filled), 
the  XI05  command  keeps  going.  This  means 
that  the  XI05  command  can  load  more  than  one 
string  variable.  A  second  difference  is  that  the 
PRINT  command  doesn't  store  the  EOL  character, 
where  the  XI05  command  docs.  And  one  last  dif- 
ference, the  PRINT  command  will  change  the  length 
of  the  string  variable  to  the  number  of  characters 
stored,  where  the  XI05  command  doesn't  change  the 
length  of  any  string  variable.  Before  you  can  make 
productive  use  of  the  XI05  command,  there  is  one 
more  necessary  fact.  Once  the  XI05  command  fills 
the  first  string  variable  to  its  current  length,  the 
next  character  fetched  is  apparently  discarded, 
and  the  next  memory  location  is  left  unchanged. 
This  applies  only  to  the  string  variable  specified 
in  the  command  statement.  The  program  in  Listing  6 
illustrates  the  preceding  discussion. 

Listing  6 

10  DIM  D*(1>:REM  OUrtTi'  STRING 

15  REM  FIND  «XJRESS  OF  DISFlftCEMENT 

20  rDDR=(  F£EK.<  134  >+PEEK(  135  ):i:256  )+2 

25  FBI  FIHJ  BEGINNING  OF  m&i  STORAGE 

30  BOA=AOR<D$> 

40  DIM  HARK  1$<  1 ). m^mW},  Xl$(  23> 

45  REM  14ITH  6  BYTES/ hRRh'y  NUTIBER. 

46  m\  THIS  DIHEbeiON:5  516  BYTES 

47  REM  OR  2:«255 

48  REM  NOW  FILL  T^£  nfifwY 

50  FOR  1=0  TO  yfi:HRi;:ftYl<r;'=I:b£/:T  I 

60  OPEN  #L3.0/'O=TEST.DAT" 

65  REM  m\  l-iRITE  THE  m^i  IH  2  BLOCKS 

78  FOR  H=0  TO  1 

80  Tff=ADR(r-W.:Kl$) 

90  tlOSLlB   1000 

110  XIO  1L#1..8.0.D$ 

120  ^£XT  H 

130  CLOSE  #1 

140  DIM  \W(^2^  1  :> . ftRRAY2f.S0  )>  X2$(  2.Z) 
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158  OPEN  #1.4.0.  "DaEST.DAT" 

155  RBI  M3W  RtAD  Tl€  hRRh'i^ 

160  FOR  H=8  TO  1 

170  Trf=H0fXnHftK2$) 

180  GOSLIB  1000 

190  XIO  7. #1.4.0.-01 

290  S€XT   N 

216  aCrSE  #1 

220  FOR  1=0  TO  80  STEP   10 

230  ?  AftRAY2<  I  '> 

240  hcyj  I 

250  END 

980  FBI  iBUBFiaJTINE  TO  FI>-;  THE 

905  REM   DlSPLflCEflENT-  ^i=BLuCK  h^UTIBER 

1000  TrP=TrP-B0A+(Ki255) 

101  e  FtKE  ADDR ..  Trf '-  Ihfr(  lW/25t  )*256 

1020  FtKE  ADDR+l..IHT(Tf1P--25€.> 

1030  RETURU 

XIOll  and  XIO? 

The  XIOll  and  XI07  commands  are  used  to  write 
and  read  blocks  of  255  bytes,  respectively.  The 
syntax  for  these  commands  is  the  same  as  for  XI09 
and  XI05  except  for  the  command  number.  The 
commands  transfer  bytes  beginning  with  the  reserved 
memory  of  the  string  variable  specified  in  the 
command.  Since  you  are  transfering  bytes,  their 
content  has  no  effect  on  the  operation  of  the  command. 
As  with  the  XI05  command,  once  the  XI07  command 
fills  the  current  length  of  the  first  string  variable, 
the  next  byte  fetched  isn't  stored  in  memory. 

Naturally  the  XIOl  1  and  XI07  commands  could 
be  used  for  handling  strings  of  characters.  However, 
if  we  knew  where  the  address  of  a  string's 
reserved  memory  was  kept,  wc  could  make  changes  to 
it,  and  use  these  commands  to  save  and  restore  any 
portion  of  memory  we  want.  Fortunately  this  isn't 
too  difficult.  Each  string  variable  will  have  an  entry 
in  the  variable  storage  area,  which  contains  8  bytes 
of  parameters  Ibr  the  variable.  The  third 
and  fourth  bytes  of  the  parameters  contain  the  dis- 
placement from  the  beginning  of  the  array  storage 
area  to  the  reserved  memory  for  that  string.  If  we 
dimension  a  string  variable  in  the  first  statement 
of  a  program,  then  this  displacement  can  be  found 
by  PEEK(134)  +  (PEEK(135)*256)+2.  Also,  the 
address  of  the  reserved  memory  for  this  string  will 
be  at  the  beginning  of  the  array  storage  area.  For  more 
detail  about  this,  sec  INSIDE  ATARI  BASIC  and 
ATARI  TAPE  DATA  FILES  in  COIMPUTE  #4. 

Listing  7  shows  how  to  save  an  array  to  disk 
and  then  read  the  data  from  disk  into  a  difi'erent 
array.  In  this  program  we  direct  the  XIOll 
command  to  save  the  desired  portion  of  memory  by 
POKEing  the  required  displacement  into  the  para- 
meters of  D$.  We  then  read  the  data  into  a  different 
array,  which  could  have  been  in  a  different  program, 
by  again  POKEing  the  necessary  displacement  into  the 


parameters  of  D$.  Note  the  use  of  the  MARK  strings 
and  the  ADR  function  to  find  where  the  arrays  are 
in  memory.  Another  application  might  be  to  add 
some  machine  language  routines  to  a  program  by 
reading  them  from  disk  or  cassette  and  storing  them  in 
the  required  location  in  memory. 

Listing  7 

10  DIM  T$<10> 

20  T$="AeCDEFGH" 

30  OPEN  #1.8.0. "DETEST. DAT" 

40  F-RIHT  *l.iT* 

50  CLOSE  #1 

60  OFEH  #1.4.0,.  "DETEST. DAT" 

70  FOR   1=0  TO  8 

80  GET  #1.A 

90  ?  fl.CHRKR'J 

100  \-&.l  I 

118  CLOSE  #1 

This  concludes  the  explanations  of  the  various  I/O 
commands.  Hopefully  I  have  e-xplained  them  well 
enough  for  you  to  put  them  to  productive  use.  Some 
of  the  explanations  are  fairly  brief,  so  to  find  out 
more,  or  to  better  understand  their  operation,  I  highly 
recommend  that  you  do  some  experimenting  of  your 
own.  This  is  the  best  way  to  find  out  what  the 
commands  will  do  in  specific  situations.  © 


The  ATARI  Tutorial 


ThelRIDIS  #1  tutorlalfor  the  ATARI  is  available  now!  You  get  a 
C-30  cassette  or  a  high-quality  diskette  with  four  excellent 
programs  foryour  ATARI,  ready  to  "Load"  and  "Run".  You  also 
receive  the 32  page  IRIDIS  GUIDE  which  provides  clear  instruc- 
tions fof  the  programs.  The  GUIDE  includes  Novice  Notes  for 
the  beginner,  and  Hacker's  Delight  for  experienced  program- 
mers- 

Our  programs  are  written  to  be  studied  as  well  as  used-  The 
GUIDE  will  have  complete  source  listings  of  selected  IRIDIS 
programs.  Not  just  listings,  but  an  explanation  of  what's  going 
on.  If  you  are  new  to  programming,  IRIDIS  is  one  of  the  easiest 
ways  you  can  learn  advanced  techniques.  If  you're  an  old  hand, 
you'll  still  find  IRIDIS  to  be  a  rich  source  of  ideas  and  ATARI 
techniques. 

ATARI  IS  a  irademarh  ol  ATARI,  Inc. 
^ ,^ 

Please  send  me  IRIDIS  t*l  for  my  ATARI  immediateSy- 

D  S9.9S  Casselle  (needs  16K)  □  SI2.9S  Disk  (needs  24K| 


AdcJress 


City/Slale/Ztp 


n  VISA     Card  Number 
id  MasterCharge       Expires 


•  u  Masierurarg 


zJtpires  J 


Published  8y:, 

Dealer 

Inquiries 

Invited 


The  Code 
Works" 


Box  550 

Goleta,  CA  93017 

805-967-0905 
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This  definitivt:  took  at  Ihe  8032  was  prepared  by  Jim  "on  assigiimenl "  for 
the  June  inue  of  PRINTOUT,  a  PET  publicalion  in  England.   Thanks 
Jim,  for  sharing  it  with  us.  One  p. s. :  It 's  my  understanding  thai  production 
models  do  have  a  small  "bell"  built-in.  RCL 

Butterfield 
Reports:  ""'1™ 
The8032 


Commodore's  newest  8000  series  computers — the 
CBM  models  8016  and  8032  —  are  noticeably  different 
from  earlier  models.  The  most  obvious  change  is  the 
width  of  the  screen,  which  now  allows  80-character 
lines.  Yet  it's  a  genUe  upgrade  in  many  ways;  users  will 
be  relieved  to  find  that  there's  a  great  deal  of  compa- 
tibility with  previous  PET/CBM  devices. 

Some  users  will  dislike  any  change,  of  course. 
Others  would  like  to  see  Commodore  boldly  scrap 
previous  architecture  and  introduce  radical  changes. 
But  for  most  of  us,  the  new  design  looks  like  healthy 
evolution:  improvements  are  being  introduced  without 
losing  continuity. 

Physical  Appearance 

The  screen  is  bigger,  of  course,  increased  to  12  inches 
across  the  diagonal  as  compared  to  9  inches  on  pre- 
vious models.  The  computer  itself  hasn't  gained  appre- 
ciably in  size,  however.  The  keyboard  housing  has 
been  lowered,  so  the  overall  height  of  the  8000  is 
only  about  an  inch  higher  than  the  original  PET. 
The  width  hasn't  changed  at  all,  although  the  new 
machine  appears  less  'tapered'  because  of  the  larger 
screen. 

Commodore  seem  to  view  the  8000  series  as 
strictly  business  machines,  and  all  models  I  have  seen 
are  equipped  with  the  business  keyboard.  This  is  a 
standard  ASCII  keyboard  plus  a  numeric  pad.  Users 


with  experience  on  other  machines  will  find  it  quite 
standard.  Programmers  who  have  been  spoiled  on 
PET's  graphic  keyboard  will  need  some  adjustment 
time:  it  seems  hard,  somehow,  to  have  to  shift 
for  such  popular  characters  as  quotation  marks, 
brackets,  asterisk,  or  the  question  mark.  1  find  it 
harder  in  an  instructional  environment:  you  can't 
reach  over  a  user's  shoulder  and  tap  in  a  correction 
quite  as  easily.  But  the  business  keyboard  is  an 
industry  standard,  and  we  might  as  well  get  used  to 
it.  There  are  interesting  new  keys:  REPEAT,  TAB 
and  ESC  (escape),  which  I'll  talk  about  later. 

Edge  connectors  are  unchanged  from  the  previous 
16K  and  32K  models:  they  are  all  there. 

General  apperance  and  quality  is  comparable  to 
earlier  models.  Characters  are  quite  readable  on  the 
green  screen;  resolution  is  good.  Text  mode  (upper/ 
lower  case)  is  the  standard  power-on  condition,  but 
you  can  get  graphics  if  you  want  them.  Lower-case 
characters  are  identical  to  earlier  models,  and  de- 
scenders on  characters  like  y,  g,  or  p  still  look  a  little 
uncomfortable. 

Keyboard  Features 

Cursor  movement  keys,  Insert/Delete,  and  SPACE 
automatically  repeat  if  you  hold  them  down.  There's 
an  initial  pause  of  a  half  a  second,  and  then  the 
cursor  takes  off  at  a  rate  of  about  ten  steps  per 
second.  The  other  keys  don't  repeat  unless  you  hold 
down  the  REPEAT  key;  then  they  take  off  right 
away,  with  no  initial  pause.  All  very  handy. 

Screen  tabulation  is  built  in.  Pressing  Shift/ 
TAB  sets  or  clears  the  tab  stop  wherever  the  cursor 
happens  to  be.  After  that,  pressing  TAB  takes  you 
to  the  next  tabulation  stop  in  that  line;  if  there  isn't 
one,  you'll  go  to  the  end  of  the  line.  Since  Shift/ 
TAB  doesn't  tell  you  whether  you're  setting  or  clearing 
the  tab,  a  little  care  is  needed  in  programming 
this.  Tabulation  is  very  useful  for  screen  tables,  but 
doesn't  help  for  the  printer. 

The  ESC  key  does  a  very  simple  job.  It  takes  you 
out  of  the  programmed-cursor  mode  (sometimes 
called  the  'quotes'  mode).  A  minor  help  for  existing 
activities;  but  it  turns  out  you'll  also  need  it  to  invoke 
some  of  the  clever  new  screen  features  that  are  built 
into  the  system. 

The  RVS  key  no  longer  slows  down  the  display 
when  things  are  printing  at  a  fast  clip.  This  job  is 
now  down  by  the  left-arrow  key.  As  usual,  the  slow- 
down applies  only  during  screen  scrolling. 

A  new  and  very  handy  feature  allows  screen 
output  to  be  stopped  and  then  resumed.  The  colon 
key  freezes  the  display  immediately  after  a  screen 
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scroll.  Pressing  the  left-arrow  allows  output  to 
continue.  This  is  useful  for  both  freezing  program 
listings  and  stopping  lengthy  output  runs;  it  allows 
the  data  to  be  examined  before  it  disappears. 
The  Bell 

The  system  contains  an  electronic  bell  which  chimes 
on  powcr-up,  on  request,  and  whenever  you  near  the 
end  of  a  line.  On  the  models  I  have  seen,  there 
is  no  speaker  or  sounding  device,  but  this  may  be 
added  in  final  production  versions.  At  any  rate,  the 
bell  signal  can  be  heard  on  the  CB2  line  of  the 
Parallel  User  Port;  a  simple  amplifier/speaker 
system  will  do  the  trick. 

The  chiming  of  the  bell  interrupts  other  activities 
momentarily.  If  you're  repeating  characters  at  high 
speed  on  the  screen,  you'll  see  a  brief  pause  when 
you  reach  the  point  near  end-of-linc  where  the  bell 
sounds.  If  this  is  a  problem,  the  chime  can  easily 
be  shortened  or  eliminated  entirely. 

Screen  Graphics 

The  screen  still  holds  25  lines  of  text,  but  each 
line  is  80  characters  wide.  This  would  make  the 
characters  look  tall  and  skinny  if  the  original  screen 
arrangement  were  kept.  Commodore  has  restored  the 
proportion  of  the  characters  by  inserting  a  strip  of 
empty  space  between  each  line. 

This  looks  good,  but  it  means  that  characters 
cannot  touch  above  and  below;  and  this  in  turn  would 
cause  odd-looking  chopped  up  graphics.  A  special 
arrangement  is  needed  to  make  graphics  look  good. 

When  you  go  to  graphics  mode,  the  screen  closes 
up  the  empty  space  so  that  characters  can  touch. 
The  effect  is  rather  like  Cinemascope:  the  overall 
height  of  the  display  shrinks  to  less  than  five  inches, 
while  the  width  remains  unchanged  at  about  eight 
inches.  In  this  mode,  graphics  from  earlier  PET/ 
CBM  machines  look  quite  good. 

This  shrinking  and  expanding  of  the  screen  is 
accomplished  with  a  new  type  of  chip  called  a  'CRT 
Controller'.  The  8000  delivers  a  lengthy  list  of  de- 
sired screen  characteristics  (o  this  controller  chip, 
which  takes  over  the  job  of  arranging  things  on  the 
screen  as  desired.  Although  Commodore  have  only  two 
types  of  setup  for  the  screen  —  text  mode  and 
graphics  mode  —  it  looks  as  if  the  controller  chip 
could  be  used  in  many  other  ways  for  special 
effects. 

New  Screen  Controls 

A  number  of  useful  screen  features  arc  included  in 
the  8000  machines.  They  promise  to  add  greater 
convenience  and  versatility  to  screen  usage. 

SCROLL  DOWN  and  SCROLL  UP  move  the 
entire  screen  up  or  down  one  line.  A  blank  line 
is  left  at  the  top  or  bottom  as  appropriate. 

INSERT  LINE  AND  DELETE  LINE  arc  almost 
self-explanatory.  They  move  the  screen  from  the 
cursor  line,  adding  a  blank  line  at  the  appropriate 
place. 


ERASE  BEGIN  and  ERASE  END  each  clear 
part  of  a  screen  line.  ERASE  BEGIN  clears  from 
the  beginning  of  the  cursor  line  up  to  but  not  including 
the  cursor  position.  ERASE  END  clears  from  the 
cursor  to  the  end  of  line,  inclusive;  it's  a  good  way 
to  clear  a  line  just  before  printing  on  it. 

Definable  Windows 

A  dramatic  new  feature  of  the  8000  screen  is  the  capa- 
bility of  restricting  screen  activity  to  a  'window' 
area.  Once  a  window  is  defined,  all  normal  activities 
are  confined  within  it.  Text  will  go  into  the  window 
area  only;  cursor  movements  will  stay  within  the 
area;  and  scrolling,  clearing,  inserts  and  deletes  will 
all  take  effect  only  within  the  bounds  of  the  window 
area. 

A  window  is  defined  by  moving  the  cursor  to  the 
desired  upper  left  location  and  giving  a  SET  TOP 
command;  then  moving  the  cursor  to  the  desired 
lower  right  location  and  giving  a  SET  BOTTOM 
command.  Only  one  window  may  exist  at  a  time; 
but  since  they  are  easy  to  set  up,  windows  can  be 
switched  in  and  out  as  desired  and  the  effect  of 
simultaneous  windows  can  be  easily  achieved. 

The  window  is  cleared  —  or,  more  precisely, 
set  to  the  full  screen  —  by  giving  two  HOME 
commands  in  succession.  This  means  that  a  user  can 
always  get  out  of  a  window  with  a  couple  of  key- 
strokes —  even  if  the  programmer  wotdd  rather  he 
couldn't. 

The  variable  window  system  is  niccK'  done,  and 
careful  attention  has  been  given  to  seeing  that  all 
systems  interact  properly.  For  example,  a  user 
responding  to  a  Basic  INPUT  statement  with  a  preset 
window  won't  have  his  entered  value  confused  with 
any  adjacent  out-of- window  data  that  may  be  nearby. 
The  bell  is  even  adjusted  so  that  it  rings  five 
characters  from  the  end  of  the  window  you  happen  to 
be  in. 

Special  Programmed  Characters 
Most  users  are  familiar  with  existing  programmed 
cursor  characters;  for  example,  the  reverse-q  for 
cursor  down.  The  new  8000  I'eatures  have  been  imple- 
mented as  additional  programmed  characters.  They 
appear  as  reverse  field  characters  within  a  print 
string.  The  new  programmed  characters  can  be  sum- 
marized as  follows: 

Character  Lower  Case  Upper  Case 

g  Ring  Bell 

i  Tabulate  Set/Clear  Tab 

n  Set  Text  Mode  Set  Graphics 

o  Set  Top  Set  Bottom 

u  Delete  Line  Insert  Line 

V  Erase  End  Erase  Begin 

y  Scroll  up  Scroll  down 

There's  a  small  trick  to  creating  these  new  reversed 
characters.  Unlike  the  more  familiar  programined 
cursor  characters,  these  functions  don't  ajipcar  as  keys 
on  the  keyboard.  To  create  ihem  within  a  quote- 
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PET .  AIM .  S YM .  KIM  OWNERS 


'Tired  of  waiting  for  your  cassette? 
*Want  versatile,  inexpensive  expansion? 
'Want  IBM  floppy  disk  compatibility? 


THE  IBM  COMPATIBLE  FLOPPY  DISK 
SYSTEM  WITH  51/4"  or  8"  DRIVES 


'Want  professional,  sophisticated  file  handling? 
'Want  consistant,  reliable  operation? 
'Want  simple,  easy-to-use  disk  syntax? 


CRS/PDOS 


A  NEW  SOPHISTICATED  DISK 
OPERATING  SYSTEM     - 


'Want  a  compatible  disk-based  Editor/ Assembler? 


CRS/ASM 


NEW  PET  OWNERS 

PEDISK  IS  AVAILABLE  FOR  NEW  PETS  TOO! 


AIM,SYM,KIM  OWNERS 

PEDISK  ADAPTOR  IS  NOW  AVAILABLE! 


PEDISK  PACKAGE  1 $799.95 

5"  DISK  SYSTEM,  CASE  AND  POWER  SUPPLY 

PEDISK  PACKAGE  2    S895.00 

5"  DISK  SYSTEM,  SlOO  CARD  CAGE,  CASE  AND  POWER  SUPPLY 

PEDISK  PACKAGE  2A  $495.00 

ADDITIONAL  5"  DISK  DRIVE,  CASE  AND  POWER  SUPPLY 

PEDISK  PACKAGE  4 $1495.00 

6"  DISK  SYSTEM,  SlOO  CARD  CAGE,  CASE  AND  POWER-SUPPLY 


EXSlOO  DISK  CONTROLLER  BOARD $49.95 

BARE  BOARD 

EXSlOO  DISK  CONTROLLER  KIT $225.00 

AIM,SYM,KIM  ADAPTOR  KIT $25.00 

CRS/PDOS  SOFTWARE  SYSTEM $75.00 

SPECIFY  OLD  OR  NEW  ROMS,  MEMORY  SIZE  8K,  16K,  32K 

CRS/ASM  EDITOR/ ASSEMBLER $150.00 

SOFTWARE  AVAILABLE  ONLY  FOR  EXSlOO,  PEDISK  OWNERS 


*NEED  MORE  ROM  ROOM? 

Toolkit  and  Word  Pro  II  occupy  the  same  rom  space 
in  your  PET!  No  problem  for  Spacemaker.  Simply 
install  both  in  the  Spacemaker  and  switch  back  and 
forth.  Add  User  I/O  and  you  can  switch  under  soft- 


The  Spacemaker 


ware  control  from  the  user  port.  User  port  occupied- 
then  get  Romdriver,  a  built-in  switch  control  port. 
Spacemaker  can  grow  as  your  switching  problems  do. 
Don't  get  caught  behind  in  the  ROM  RACE. 


SPACEMAKER $29  QO 

USER  I/O  $12.95 

CABLE  ASSEMBLY  AND  SOFTWARE  ON  COMMODORE  OR 
PEDISK  DISK 

ROMDRIVER $39.00 

PORT  CONTROL  BOARD  WITH  SOFTWARE  LISTING 

ROM  I/O $9.95 

ROM  DRIVER  SOFTWARE  ON  COMMODORE  OR  PEDISK  DISK 
SEE  YOUR  LOCAL  DEALER  OR  CONTACT: 


MICROTECH 

P.O.  Box  102 

Langhorne,  PA  19047 

215-757-0284 


PEDISK,  Spacemaker  is  a  Irademark  of  CGRS  Microtech 
Pet,  Kim  is  a  trademark  ol  Commodore 
Aim  Is  a  trademark  of  Rockwell 
SYM  is  a  trademark  of  Synertek 
Toolkit  is  a  trademark  of  Palo  Alto  KS. 
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enclosed  string,  you  need  to  [)ress  ESC  (whitli  lakes 
you  out  of  programmed  cursor  mode);  then  RVS 
Ibllowed  by  one  of  the  abo\e  characters.  It  works 
well,  but  takes  a  little  getting  used  to. 
Software 

The  current  8000  units  are  fitted  with  Basic  4.0.  This 
is  the  familiar  Upgrade  ROM  with  disk  operators 
added  to  Basic,  and  with  an  improved  garbage 
collection  routine. 

Garbage  collection  is  much  faster:  a  hesitation 
is  visible,  but  all  collections  take  place  within  a 
second  or  so.  The  penalty  paid  by  the  user  for  this  is  a 
relatively  slight  one:  two  more  bytes  are  used  for 
each  dynamic  string. 

The  80OO's  ROM  set  is  larger.  Basic  now  starts 
at  hexadecimal  BOOO  rather  than  COOO,  meaning  that 
users  now  have  an  18K  ROM  system  rather  than 
14K. 

The  disk  commands  are  English  language  equiva- 
lents to  the  commands  already  available  with  the  DOS 
or  'wedge'  system.  At  first  glance,  they  don't  seem 
to  do  anything  new.  However,  they  are  much  easier 
to  use  for  newcomers;  and  they  strengthen  the  PET's 
excellent  human  interface.  It's  a  great  convenience 
to  be  able  to  press  Shift  and  Run/Stop  to  get  the 
first  program  from  a  disk.  Another  advantage  of 
these  commands  is  that  they  can  be  embedded  in  a 
program.  We  can  now  write  100  SCRATCH  "OLD- 
FILE"  and  gain  ease  and  simplicity  of  coding. 

The  disk  commands  appear  to  be  written  with 
the  new  Disk  system  in  mind.  This  is  a  new  set  of 
ROMs  for  disk  which  will  enhance  its  ease  of  use 
greatly.  No  hardware  changes  are  needed:  fit  the  new 
ROMs,  and  you  have  a  new  disk  system.  This 
system  doesn't  need  an  explicit  Initialize  command  — 
it's  automatic  when  a  new  disk  is  inserted.  There 
are  several  attractive  features  of  the  new  disk 
system,  including  an  APPEND  command  and  a  new 
style  of  relative  or  direct  access  file;  the  8000 
commands  are  geared  to  support  all  this. 

A  brand  new  disk  unit,  the  8050,  is  being  intro- 
duced by  Commodore.  Its  characteristics  are  identi- 
cal to  those  of  the  enhanced  2040  unit,  except 
for  its  huge  capacity.  With  77  tracks  of  data  and 
more  sectors  on  each  track,  a  mini-floppy  can  now 
hold  in  excess  of  two  thousand  blocks  of  data. 
This  gives  a  capacity  of  over  one  megabyte  of  data 
for  the  two  drives.  Many  commercial  and  data  storage 
applications  will  now  fall  within  the  scope  of  the 
PET/CBM. 

The  8050  dual  floppy  unit  has  a  similar  size 
and  appearance  to  the  well-known  2040.  It  has  a 
power-on  indicator:  the  centre  LED  now  shines 
green  for  power  applied,  and  red  for  errors.  Diskette 
insertion  is  slightly  different.  The  high-precision  drive 
mechanism  requires  precise  centering;  the  simple 
'tab'  door  has  been  replaced  with  a  more  elaborate 
assembly. 

Communications  between  the  PET/CBM  and  the 


8050  unit  are  the  same  as  for  the  2040,  Most 
disk  programs  will  be  fully  compatible  unless  they 
use  some  of  the  more  esoteric  aclvanced  commands. 
You  can't  read  an  8050  disk  on  a  2040  unit,  or 
vice  versa,  but  Commodore  has  developed  a  utility 
program  which  will  copy  files  from  one  to  the 
other.  It's  interesting  to  note  that  the  (Commodore 
program  seems  to  be  able  to  change  the  8050  device 
number  on  the  IEEE  bus  via  software. 

Compatibility  between  the  two  styles  of  2040 
system  —  the  original  and  the  upgrade  —  exists 
in  part.  Each  type  of  unit  can  read  the  other's 
data,  but  cannot  write  to  a  disk  that  was  new-ed 
on  the  other  machine.  A  quick  COPY  will  fix  up  any 
problems  in  this  area,  but  the  user  should  keep 
in  mind  that  there  are  six  less  blocks  available  on  the 
new  style  of  2040. 

Machine  Language  Considerations 

The  various  subroutines  in  Basic  ROM  h.a\'e  moved 
around,  of  course:  that's  una\'oidablc.  Machine 
language  programmers  will  be  happy  to  know  thai  the 
vital  zero  page  locations  are  virtually  vunhanged. 
Adapting  existing  programs  shouldn't  be  loo  hard. 

The  second  cassette  buffer  is  now  u.^^ed  in  two 
ways.  The  Icjwer  addresses  are  used  for  tin:  disk 
commands;  and  higher  addresses  (hex  03 IT'  and  up) 
are  used  for  tabulating  TAB  positions.  Greater  care 
will  need  to  be  exercised  in  using  the  buiier  for 
staging  small  machine  language  jobs. 

The  Machine  Language  Monitor  is  unchanged.  It 
can  still  be  extended  with  extra  commands;  and  'un- 
crashing'  is  accomplished  in  the  same  manner  as  for 
previous  models. 

Some  of  page  zero  has  been  released,  Since  screen 
lines  no  longer  need  to  be  linked  together  into 
'double'  lines,  the  fairly  lengthy  screen-wrap 
table  isn't  needed. 

Serious  programmers  will  be  delighted  to  find 
that  special  vectors  are  provided  for  input  and  output. 
Now  they  will  be  able  to  link  their  own  I/O 
routines  directly  into  the  system. 

Summary 

It's  still  distinctively  a  PET/CBM  style  machine. 

It  retains  its  friendly  personality,  and  the  new  features 

look  good. 

The  80  character  line  screen  will  make  many 
new  applications  possible  —  especially  (hose  involving 
columns  of  figures.  Basic  hasn't  changed  at  all,  and 
most  changes  are  gentle,  so  as  not  (o  obsolete  old 
machines  or  programs  —  or  old  programmers,  lor  (hat 
matter.  © 
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Plotting  With  The  2022  Printer 

John  Winn     Department  of  Chemistry     University  of  California 


PLOT  OF  V=SIH';"X'::'  FDR  K=  a  W-n    TO  6  *1T 
PRRRMETERS  FOR  THIS  GRhPH. . . 
NV=  60  N><=    60   VT=  10   KT==  5 
S:i=iMF='L_E:   F-L-OT" 

In  the  January/February  issue  of  COMPUTE,  Len 
Lindsay  mentioned  using  the  Commodore  Model  2022 
Tractor  Feed  Printer  for  plotting  applications.  He 
pointed  out  that  the  ability  to  vary  the  line  spacing  in 
this  printer  allows  a  high  degree  of  vertical  resolution. 
In  a  somewhat  unrelated  article  in  the  same  issue, 
W.M.  Bunker  showed  how  the  user-defined  character, 
CHR$(254),  could  generate  attractive  lower  case 
letters  with  descending  tails.  He  also  mentioned  the 
plotting  possibilities  of  this  printer.  This  article  puts 
both  ideas  together  -  the  variable  line  spacing  and  the 
user-defined  character  --  to  produce  a  plotting  sub- 
routine of  surprisingly  high  resolution. 

The  logic  behind  this  subroutine  (which  is  actually 
a  set  of  subroutines)  is  to  increase  resolution  from 


;TEP    .01     *tT 


that  given  by  the  height  of  a  line  and  the  width  of  a 
space  to  that  of  a  single  printer  matrix  dot.  In  the 
way  I  will  describe  the  subroutine,  I  will  have  in 
mind  a  graph  of  computed  values  of  some  function, 
such  a  Y   =  SIN  (X).  In  the  second  part  of  the 
article,  I  will  show  how  data  values  can  be  plotted 
point  by  point,  how  bar  graphs  could  be  generated, 
and  how  more  generalized  graphics  could  be  done. 

Think  about  how  you  would  graph  the  function 
Y   =  SIN  (X)  by  hand.  You  would  decide  first  which 
direction  on  your  graph  paper  would  be  in  the  X 
direction,  and  which  the  Y  direction.  For  us,  the  X 
direction  will  increase  down  the  page  as  the  printer 
paper  advances,  and  the  Y  direction  will  increase 
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100  REM  INITIALIZE  PLOT  SIZE  VARIABLES 
110  INPUT  "HCW  MANY  COLUMNS  { 1  TO  n 

^601 ";KY 
120  INPUT  "HOV;  MANY  COLUMNS  PER  TICK'rYT 
130  INPUT  "HCW  MANY  ROWS  1120  PEE  -, 

tPAGE) ";KX 
140  INPUT  "HOW  MARY  ROWS  PER  TICK"; XT 
150  INPUT  "X  MIK  AND  X  KAX";XN,XX 
160  INPUT  "Y  MIN  AND  Y  MAX";YN,YX 
170  INPUT  "X  START  AMD  END  {UNITS  01- 

^) ";X1,X2 
180  INPUT  "X  INCREMENT  (UNITS  OF    )"rXS 
200  BEJi  CALL  INITIALIZATION  SUBROUTINE 
21D  GOSUB  6000D 
300  REM  DEFItJE  THE  FUNCTION  TO  BE  ^ 

-.PLOTTED  POINT  BY  POINT 
310  FOR  X=X1*    TO  X2*    STEP  XS* 
320  y=SIN(X) 
33D  REM  CALL  MAIN  SUBROUTINE  FOR  EACH  ^ 

-.POINT 
340  GOSUB  61000 
350  NEXT 
400  REM  CALL  THE  PLOT  TERI'iIKATIOK  -. 

-.SUBROUTINE 
410  GOSUB  6e5Bn 
500  REK  ADD  A  TITLE  TO  THE  BOTTOM  OF  -. 

^THE  GRAPH 
51D  OPEN1,4,0 
520  PRINT#1,  "PLOT  OF  Y=SIN(X)  FOR  -. 

-.X="X1"*    TO  "X2"*    STEP  "XS"*   " 
600  REM  PRINT  OUT  REMAINING  GRAPH  -i 

-.PARAJIETERS 
610  PRINT  #1, "PARAMETERS  FOR  THIS  GRAPH  n 

620    PRINTtl,"NY="KY"    NX="NX"    YT="YT"    - 

•,XT="XT 
999    END 

s  1=1  n  F- 1_  E     ri  F^:  r  ■-.■■  I  hJ  1" 


across  the  page,  in  the  dirc-clion  of  the  print  head 
motion.  Normally,  you  would  hold  the  graph  paper  so 
that  X  increases  from  left  to  right  and  Y  increases 
from  bottom  to  top.  On  the  printer  plot,  this  orienta- 
tion is  achieved  by  tilting  your  head  to  the  right  - 
the  plot  will  be  rotated  from  the  usual  orientation 
as  it  is  produced  by  the  printer. 

Your  next  choice  in  plotting  by  hand  is  to  pick 
the  minimum  and  maximum  X  and  Y  values  to  be 
spanned  by  the  graph.  Let's  call  these  values  XN,  XX, 
YN,  and  YX,  respectively,  in  the  program.  You  would 
then  decide  how  frequently  to  mark  off  the  two  axes 
with  tick  marks,  and  how  big  to  make  the  graph  (how 
much  of  the  graph  paper  page  to  use).  For  the  printer, 
we  can  choose  the  size  of  the  graph  by  specifying 
the  number  of  columns  wide  fcjr  the  Y  axis  (variable 
NY)  and  the  number  of  rows  long  for  the  X  axis 
(variable  NX).  The  size  of  the  page  limits  NY  to  a 
maximum  of  about  60  for  a  standard  8  1/2"  x  11" 
page.  The  X  axis  can  be  as  long  as  you  want  (until  you 
run  out  of  paper!),  but  at  the  line  spacing  used  in  the 
program,  one  has  about  120  lines  (rows)  per  page.  Tick 
marks  are  specified  by  stating  the  number  of  columns 
per  tick  (variable  YT)  and  the  number  of  rows  per 
tick  (variable  XT). 

Your  final  step  in  making  the  graph  is  to  choose  a 
starting  value  for  X,  a  final  value  for  X,  and  an 
increment  for  X.  The  smaller  the  increment,  the  more 
points  you  will  have  to  plot.  You  then  generate  values 
for  Y   =  SIN  (X)  at  each  X  value,  and  put  a  point  on 
your  graph  paper  at  each  (X,Y)  coordinate.  The  heart 
of  the  plotting  subroutine  does  exactly  the  same  thing. 
Given  X  and  Y  pairs  of  values,  the  subroutine  figures 
out  which  row  and  column  they  lie  in,  and  turns  on 
the  dot  in  that  space  which  corresponds  to  that  (X,Y) 
pair.  On  the  printer,  the  spacing  between  lines  is  set  so 
that  each  row  is  six  dots  tall.  The  column  to  column 
spacing  is  also  six  dots,  giving  a  resolution  of  about 
1/60".  (This  is  comparable  to  early  digital  plotters 
with  0.01"  resolution!) 

Now  look  at  the  subroutines.  The  first  one  (lines 
60000-60400)  is  called  via  GOSUB  60000  once  your 
main  program  has  established  the  values  for  scaling 
and  size  mentioned  above  (NY,  NX,  YT,  XT,  XN, 
XX,  YN,  and  YX).  First,  it  opens  files  for  its  own 
communication  with  the  printer.  Secondary  addresses 
0,  5,  and  6  are  needed  to  print,  set  the  special 

60000  OPEH 1 0 ..  4 ..  0  ■  OPEN  1 1  ..  4 ..  5  ^  OPEN  1 2  .■  4 ..  6  ■  I  FN  V:>60THENNV=60 

60050  XT;-;=XT  -  VT;;=VT  ■■  LL;i=0  -  LB--;=0  :  NX";=6*NK-1  ■  NV?^=6*NV-1 

60 1 00  CRt=CHR*  a  4 1 :3  :  SC:*=C:HR*  <  254 .-'  •  Q=  ( HV,"-;+ 1  ::■  /6-LEN  <  STR*  C  Vl 

60150  PR  1 1JT#  1 0  :  F'R  I  NT#  1 0 ..  TAB  i.  9  >  VH .;  TAB  (  Q  >  VX  :  PR  I  NT#  10.." 

60200  I  FQ/VT-;=I  NT  ■;  Q/WJ'-i  >  THEW60300 

60250  PRIHT#10.  "_".:  •  GOTO6035t.i 

60300  PRINT#10..  "J"; 

60350  NEXT  ■■  PR  I  MT#  1 0 ..  "  _"  ■  PR  I  NT#  1 2 ..  CHR*  ■■'  1 4  >  :  Q-$-3TR-$  <  XN  ;■  •  Q*=R  I GHT*  C  Q* ..  LEN '-.  Q  t .)  -1.:. 

60400  PR  I  NT#  1 0 ..  TAB  <  1 0-L  EN  ■::  Qt-  :>  ':>  Q t ;  CR t ,:  ■  RETURN 
I  M  I  T  I  FHi_  I  Sri=n~  I  on       SLIEROUT  I  ME 


F-  R:  lilj  R:  (-i  hi 

61000  IF  (Y<YN)OR(Y>YX)0R(X<XK)OR(X  XX)  -. 

-.THEN  RETURN 
61100  NC%  =  l+(Y-YN)/(YX-VNl*Ny% 
61110  NB%  =  (NC%-l)/6  :  NC%  =  NC%-6*NB% 
61120  NRt  -  1+1X-XN)/(XX-XN>*NX% 
61130  NL%  =  lKRt-l)/6  :  KR*.  =  NR4-G»NL% 
61140  IF  NL%  <>  LL%  OR  m%    <>  LB4  THEN  -. 

..GOSUB  612G0 
61159  LL!.=NL%  :LB%  =  NB%  :C%  (  NC%)  =C*  (  N'C%  )  -. 

-.OR   2"(6-NR^)     :    RETURN 
61200   QS   =    ""    :    FOR   0=1    TO   6    :0S=QS+C11RS 

-.(CS(Q))     :    C4|Q)=0    :    NEXT    : 

T  PRIMTS11,0S 
61210  PRIMTS10,TAB(LB%+li) SC5CRS 
61220  IF  NL%  =  LL?,  T!!EN  RETURN 
61230  IF  (I.L%  +  1)/XT%  =  INT(<LL%  +  1)/XT5;)  ^ 

^THEN  61250 
61240  PRINTSlOjTABdB)  "y"  TAB(KY)"1"  : 

^  GOTO  61260 
6125Q  PRINT*10,TAB(1O)  "  "  TABtKY)  "L° 
6126D  IF  NLi  <>  LL%  +  1  AND  NL%  <>  LL%  -. 

-.THEM  GOSUB  61300 
61270  RETURN 

61300  FOR  Q=l  TO  NLI-LH-l 
6131G  IF  (LL%+Q+1)/XT%=INT{(LLS+Q+11/ 

-,XT%)  THEN  6133a 
61320  PRINTSIB,  TAB(10) 

-,"1"  :  GOTO  61340 
61330  PRINT#10,  TAB(10) 

-."L"LIST 
6134D  NEXT  :  RETURN 
r-1l=lIM   F-l^O-TTIHC 


"t"    TAB(NY) 

TAB  (NY)     -. 

lO      Sl_lE:Fi;CU-lT  I  ME 


Note:  Thcsr  listings  wcfc  dom-  >^ith  a  CBM  32B  tnmputer  whkli  ii.:i5  a  slightly  ilifTefvnt 
KTaphits  rliaraclcr  set  .iml  i.i>  ki-v  fur  PI.  In  tlip  Saitiplr  Driviiic  Pra^^..^.l  l.ii.rs  170.  IBO,  310.  and 
:.20  shtiuld  have  the  svttilwil  fnr  I'i  iriscrli-il  iii  iht- sp.iit'*  kit  Ijl.ink-  In  iKe  M.iiii  Plottln^  Suhruutinf. 
liins  fiiaSO  ant)  6i:(:ll)  l.avr  .1  blank  ill  i|i]ii!i'5  vihuh  shiiiild  l.<-  .  ...  il.r  ■■.ipimiU' 
lyiaratlrf  lo  xhc  L. 


[iKir! 


IFQ<0THENQ=0 
J",;  :FnRQ=lTOHV 
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Skylcs  Electric  Works 


The  BASIC  Programmer's  Toolkit 

For  PET  Owners  Who  Want  More  Fun 
And  Fewer  Errors  with  Their  Programming 

Here  are  Ten  Comands  you'll  need,  all  on  a  single  chip  you  can  install, 
in  a  minute  without  tools,  on  any  PET  or  PET  system.  2  KB  of  ROM 

firmware  on  a  single  chip  with  a  collection  of  machine  language 
programs  available  to  you  from  the  time  you  turn  on  your  PET  to  the 
time  you  shut  it  off.  No  tape  to  load  or  to  interfere  with  any  running 
programs. 


AUTO        DELETE 
STEP        OFF 


RENUMBER        HELP        TRACE 
APPEND        DUMP        FIND 


10GOSUB99 

15  PRINT  I 

IS  GOTO  10 

n  INPUT  J 
1D0  IF  J  =0  THEN  END 
200  USaR(J):RETUnN 
READY 

RENUMBER  100.10 


100  QOSUB  130 
110  PRINT  1 
1J0  GOTO  10O 
1M  INPUT  J 
1«  IF  J  =0  THEN  END 
1S0I  =  $0R(J|:RETURN 
HEADY. 


7DIVISI0N  BY  ZERO  ERROR  IN  SOO 
READY. 
KELP 
SOOJ.SQRIA-Sfa) 


PRESS  PLAY  ON  TAPE  *1 

OK 


SEAHCHING  FOR  INPUT 
FOUND  INPUT 
APPENDIHQ 


r 

TRACE 

•  100 
irllO 

READY. 

■  150 

RUN 

•  160 

•  175 

ENTER  YOUR  NAME?  JIM 

•3O0 

HIJIH. 

HOW  OLD  ARE  YOU? 

^ 

f 

^ 


Can  be  placed  in  main  board  socket  or  with  precision-engineered  PCB 

Now  available  to  interface  with  your: 

PET/CBM  models  8N/8B,  16N/16B,  32N/32B  (chip  only)  TK160N  $  50.00* 

PET  2001-8  (chip  and  interface  PCB)  TK80P,  TK160P  80.00* 

Expandamem  TK80E.  TK160E  80.00* 

Skyles  Memory  Expansion  System  TK80S,  TK160S  80.00* 

PME  1,  RC  Factor,  Eventide  Clockworks  TK80S,  TK160S  &  GTK  90.00* 
Computhink  Disk  System  for  PET  1  (original  PET)  TK80ED-1, 

TK160ED-1  90.00* 

Computhink  Disk  System  for  PET  It  (new  PET)  TK160ED-2  100.00* 
Commodore  Word  Pro  II  (for  original  PET  2001-8)  TK160  (S  or  E) 

&  Socket  2  ME  95.00' 
Commodore  Word  Pro  III  (for  original  PET  2001-8)  TK160  (S  or  E) 

&  Socket  2  ME  III  95.00* 
Commodore  Word  Pro  II  (for  new  PETs,  CBMs)  TK160N 

&  Socket  2  ME  72.50* 

Commodore  Word  Pro  III  (for  new  PETs,  CBMs)  TK160N  50.00* 

Skyles  MacroTeA  TK80M,  TK160M  50.00* 
"■Shipping  and  handling  $2.50  USA,  Canada;  $10.00  Europe,  Asia 

•California  residents    please  add  6%  or  6  5°s  sales  tax  as  required 
VISA,  MASTERCHARGE  ORDERS  CALL  (800)  538-3083  (except  California  residents) 
CALIFORNIA  ORDERS  PLEASE  CALL  (408)  257-9140 


Skyles  Electric  Works 


231  E  South  Whisman  Road 
Mountain  View,  CA  94041 
(415)965-1735 
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character,  and  set  the  line  spacing,  respectively. 
Variables  needed  by  the  subroutine  are  computed  or 
initialized,  the  YN  and  YX  values  are  printed  outside 
the  graph,  the  Y  axis  is  printed,  along  with  tick  marks, 
using  graphic  symbols,  the  line  spacing  is  set  via 
PRINT  #  12,  CHR$(14),  and  the  XN  value  is  printed, 
setting  up  the  first  row  for  plotting.  The  first  sub- 
routine returns  at  this  point. 

Your  main  program  then  computes  (X,Y)  pairs, 
one  at  a  time,  in  increasing  order  of  X.  After  each  pair  is 
computed,  your  program  goes  to  the  main  subroutine 
via  GOSUB  61000.  This  subroutine  first  checks  to  see 
if  the  computed  point  really  lies  within  the  graph 
limits.  If  not,  it  simply  returns.  Lines  61100  to  61130 
find  out  which  row  (NR%)  of  matrix  dots  contain  the 
point,  {X,Y).  These  lines  also  find  out  which  printer 
line  (NL%)  we  are  dealing  with,  and  how  many  blank 
spaces  (NB%)  preceed  the  one  containing  (X,Y).  The 
special  character  is  built  up  in  the  array  C%. 
Whenever  a  dot  appears  in  a  new  row  or  column,  the 
current  special  character  is  printed  (lines  61200  and 
61210)  without  a  carriage  return/line  feed.  If  we  are 
suddenly  on  a  new  line,  that  condition  is  sensed 
(via  the  variable  LL%,  standing  for  "last  line")  and 
the  X  axis  borders  (at  both  ends  of  the  graph  and  with 
tick  marks  if  required)  are  printed  to  finish  the  line 
and  move  on  to  the  next.  If  it  is  recognized  that 
several  blank  lines  are  required  between  the  last  point 
and  the  current  one,  these  are  generated  as  well  (lines 
61220  through  61340  do  all  this).  The  subroutine  can 
RETURN  to  get  the  next  (X,Y)  values  at  several 
points  in  this  scheme. 

Finally,  when  all  the  (X,Y)  pairs  have  been 
computed,  your  main  program  calls  the  termination 
subroutine  via  GOSUB  60500.  This  routine  forces  a 
point  to  be  plotted  at  (X    =  XX,  Y    =  YX)  to 
guarantee  that  any  remaining  blank  lines  appear  at  the 
"end"  of  the  plot.  The  linal  X  axis  label,  XX,  is 
printed  out,  along  with  the  "bottom"  Y  axis  border 
(lines  60550-60750).  The  line  spacing  is  graciously 
reset  to  the  default  value  whh  the  PRINT  #  12,  CHRS 
(24)  statement.  Finally,  YN  and  YX  values  are  printed 
once  more,  the  files  are  closed,  and  the  subroutine 
returns. 

The  graph  is  now  complete,  as  far  as  these  sub- 
routines are  concerned.  Any  graph  titles  or  other 


notations  you  may  want  can  be  printed  before  plotting 
(before  the  GOSUB  60000)  or  after  plotting  (on  return 
from  the  termination  subroutine), 

A  sample  driving  program  is  shown  to  illustrate 
these  instructions.  The  REM  statements  point  out 
what  is  happening  step  by  step.  Of  course,  the 
values  set  by  INPUT  statements  could  be  computed 
directly  in  many  cases,  as  long  as  they  ari!  established 
before  plot  initialization.  The  final  plot  produced  by 
this  program  is  shown  as  well.  Note  that  the  limiting 
factor  in  the  plot  quality  is  the  mechanical  error  in 
print  head  motion.  The  print  head  does  not  return  to 
exactly  the  same  point  with  each  carriage  return. 
That's  why  the  X  axis  is  a  bit  wiggly,  at  least  on 
my  printer. 

The  speed  at  which  a  plot  is  produci-d  depends 
on  two  factors.  The  first  is  the  computation  time 
needed  to  generate  (X,Y)  points  themselves.  The 
second  is  quite  variable  and  depends  on  the  shape  of 
the  graph  and  the  X  increment  chosen,  f^ach  print 
line  containing  at  least  one  plotted  point  must  be 
printed  twice  -  once  for  the  point,  without  a  line 
feed,  and  once  for  the  X  axis  borders,  with  a  carriage 
return/line  feed.  If  several  plotted  points  occur  on  the 
same  print  line  in  a  variety  of  print  columns,  the 
line  will  be  overprinted  several  times,  since  the  special 
character  can  be  used  in  only  one  way  in  any  single 
PRINT  statement.  The  example  graph  took  about  5 
minutes  to  plot  all  600  points. 

A  few  general  comments  are  in  order  before 
turning  to  ways  to  extend  the  subroutine.  First,  integer 
variables  are  used  in  many  places  to  force  truncated 
integer  arithmetic  without  specifying  the  INT  function. 
An  exception  occurs  in  lines  60200,  60600,  61230 
and  61310  where  INT  is  used  to  sense  the  need  to 
print  a  tick  mark.  Also  notice  the  use  of  the  logical 
OR  in  line  61150  to  turn  on  the  bits  that  .set  the 
special  character.  (The  2022  instructions  describe  how 
to  set  this  character  dot-by-dot.)  The  OR  is  needed 
rather  than  a  simple  addition  in  case  the  same  matrix 
dot  is  turned  on  by  more  than  one  (X,Y)  pair.  The 
OR  will  not  change  a  bit  already  set,  while  addition 
will,  in  general. 

Since  this  subroutine  package  is  meant  to  be  used 
by  a  variety  of  programs,  it  has  a  self-contained 
file  structure,  opening  and  closing  vs'hat  it  needs 


60580  X=XX : V=VX ■ GOSUE61000 : GOSUB61200 : GOSUB61250 

60550  Q*:=STRf:  C  XX  >  ■  G!*=R  I GHT*  <  Qt ..  LEN  <  Q$  >  - 1  >  ■  PR  I  NT#  1 0 ..  TflE  ■;:  1 0-LEN  C  Q*  .5  >  tTl*  "  ~I"  : 

60600  F0RG:!=  1  TON  V  •  I  FQ/VJy.=  I  Hit  Q/VJH  .:■  THEHSe?©© 

60650  PRINT#10..  "~";  :GGTG60750 

60700  PRINT#10..  "~i".; 

60750  NEXT:PRINT#10..  "~"  ••  PRINT#12..  CHRt<."24> 

60800  Q=  <  NV;--;+ 1  > /6-LEN  (.  STR*  ■.:  VH.'J  >  ■  I FQ<0THEHQ=0 

60850  PR  I  NT#  1 0 ,.  TAB  1 9  ':>  VN .;  TRB  <  Q  >  VX 

e&9QQ  CLOSE  1 0 : CLOSE 1 1  : CLOSE 1 2 : RETURN 
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PET  TWO-WAY  RS-232 

and  PARALLEL 
OUTPUT  INTERFACE 


SADl  -  The  microprocessor  based  serial  and  parallel 
interface  for  the  Commodore  PET.  SADl  allows  you  to 
connect  your  PET  to  parallel  and  serial  printers, 
CRT's,  modems,  acoustic  couplers,  hard  copy  termi- 
nals and  other  computers.  The  serial  and  parallel 
ports  are  independent  allowing  the  PET  to  communi- 
cate with  both  peripheral  devices  simultaneously  or 
one  at  a  time.  In  addition,  the  RS-232  device  can  com- 
municate wtth  the  parallel  device. 


Special  Features  for  the  PET  interface  include: 

Conversion  to  true  ASCII  both  in  and  out 

Cursor  controls  and  function  characters 

specially  printed 

Transfers  programs  between  PETs 

over  the  phone  line  using  a  nnodenn. 

Selectable  reversal  of  upper  and  lower  case 

PET  IEEE  connector  for  daisy  chaining 

Addressable  -  works  with  other  devices 
Special  Features  for  the  serial  interface  include; 

Baud  rate  selectable  from  75  to  9600 

Half  or  full  duplex 

32  character  buffer 

X-ON,  X-OFF  automatically  sent 

Selectable  carriage  return  delay 
Special  Features  for  the  parallel  interface  include: 

Data  strobe  ■  either  polarity 

Device  ready  -  either  polarity 

Centronics  compatible 
Complete  with  power  supply,  PET  IEEE  cable,  RS-232 
connector,  parallel  port  connector  and  case.  Assembled 
and  tested. 

SADIa(110VAC)$295 

SADIe(230VAC)  S325 


CONNECTICUT     microCOMPUTER,  Inc. 

ISO  POCONO  ROAD 
BROOKFmiD,  CONNECTiCUT  09904 

TEL  {203}  775-9659        7WX:  710-4S6-0Q52 

VIM    AHO    y/C    ACCEPTED  -  JCHO    tCOyjlC    HUHKA,  tX^fUTKMC  UT£   UD    liCN    3ttKA. 


DISK  GENERAL  LEDGER  maintains 
complete  financial  information  on 
diakellB.  Utilizes  printer  and  generates 
Trial  Balance,  ProfiWLcss  Statement, 
Balance  Sheet  and  Journal.  Enables 
user  (0  edit  data,  close  out  year  end 
account8  and  debil-credit  verification. 
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SAWYER  SOFTWARE  OFFERS  a  Complete  line  of  cassstia  and  disk 
based  business  software  lor  your  PET  or  TRS-80  computers.  Eacti 
program  tias  been  specifically  designed  for  ease  of  use  and  come  with 
instruction  manuals.  SAWYER  SOFTWARE'S  disk  packages  run  on 
Commodore,  Compu-Think  or  TRS-80  disk  systems  witti  32K  and  at 
least  one  disk  drive.  Call  or  write  for  free  brocfiure. 


_  Sawyer  Software  now  tias  available  tfie  complete  line  of 
\_f  Commodore  micro-computers,  disk  drives  and  printers.  Witfi 
_^  tfie  purcfiase  ot  a  complete  CBfs')  system  or  any  piece  of 
(J  Commodore  hardware,  you  can  receive  up  to  $390.00  worth  of 
free  software.  We  also  have  memory  kits  to  expand  your  eK 
J\J\  PETtoa24Kor32Kmachine. 
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Educational  Discounts: 
Buy  2  PET  Computers  and 
receive  1  free. 


master  charge 


201  Worley  Rd. 

Dexter,  Mo.  63841 

(314)624-7611 


Telephone  Orders  Welcome 


[2>ealBr  Inquires  Invited 


DISK  PAYROLL  computes  PICA, 
Federal  and  Slate  taxes.  Stale  tax  Is 
calculated  on  a  percentage  of  the  gross 
pay  and  can  be  customized  tor  your 
particular  slate.  Will  allow  use  of  City 
tax  and/or  other  deductions.  Utitiies 
printer  for  reports  such  as  Payroll 
Register,  which  includes  current 
payroll,  quarterly  and  year-to-date 
figures  and  the  Payroll  Account 
Summary,  which  prints  a  department 
breakdown  for  cost  accounting  and 
gives  a  recommended  tax  deposit. 
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independently  of  the  main  program.  For  any  particu- 
lar program,  this  feature  could  be  removed  and  all 

files  could  be  controlled  by  llic  main  prt)gratn. 

Suppose  you  want  to  plot  rather  widely  spaced 
points,  rather  than  closely  spaced  points  along  a 
curve.  Witiely  spaced  single  dots  are  difficult  to  see. 
Or  suppose  two  or  moie  difierent  sets  of  data  have  to 
be  plotted  on  the  same  graph.  What  is  needed  in 
both  cases  is  some  way  to  plot  larger  and  different 
types  of  symbols  instead  of  points.  One  way  ol  plotting 
symbols  is  discussed  below,  but  it  is  not  iool- 
proof. 

The  simplest  way  to  make  an  arbitrary  symbol 
(a  plus,  X,  square,  or  whatever)  is  to  begin  by 
defining  the  dot-to-dot  distances,  DX  and  DY,  with 
the  statements 

DX   =  (XX-XN)  /  (6*NX) 
DY   =  (YX-YN)  /  (6*NY). 
Then,  after  computing  each  {X,Y)  pair,  call  a  new 
subroutine  (let's  say  it  is  called  by  GOSUB  62000)  in 
line  340  of  the  example  program  instead  of  the  main 
(61000)  subroutine.  The  new  subroutine  constructs 
the  symbol  you  choose,  centered  about  the  correct 
(X,Y)  point.  In  the  sample  symbol  subroutine,  the  way 
to  plot  a  small    +  ,  three  dots  wide,  is  shown.  Other 
symbols  can  be  created  in  many  shapes  and  sizes,  but 
all  arc  subject  to  problems  if  the  X  values  are  too 
closely  spaced.  If  the  symbols  overlap  from  one  print 
line  to  the  next,  and  the  next  symbol  wants  to 
extend  back  to  the  previous  print  line,  you  have 
troubles.  The  printer  won't  back  up.  The  only  safe 
way  around  this  problem  is  to  go  through  your  data 
point  by  point,  and  create  a  new  data  set  representing 
all  the  dots  in  all  the  symbols  for  all  the  original  data. 
This  new  data  set  has  to  be  arranged  in  order  oi 
increasing  X  values,  but  it  can  then  be  plotted 
point-by-point  using  the  original  scheme  without 
problems. 

More  complex  graphics  -  high  resolution  pictures 
of  arbitrary  shapes  -  will  always  have  to  face  the 


problem  of  one-directional  paper  motion.  A  line-by- 
line "raster  scan"  is  possible,  but  60  prim  colunms 
contain  60.\6x6    =   2160  matrix  dots  per  piint  line. 
Turning  on  die  correct  dots  and  scanning  all  the 
possibilities  could  take  an  intolerable  amount  of  time. 
For  many  ajiplicalions,  a  bar  graph  (histogram)  is 
more  useful  than  a  point-by-point  or  line  giaph. 
Bar  graphs  are  easily  generated  using  the  built-in 
PET  graphics  characters,  as  long  as  the  bars  go  "across 
the  page"  rather  than  "up  and  down."  The  line 
spacing  nuist  be  set  to  the  same  close  spacing  used 
here,  or  to  a  closer  spacing,  if  half-size  giaphic 
symbols  (and  lower  resolution)  are  acce]>ta!)le.  The 
resolution  is  lower  because  half-size  symbols  don't 
come  in  as  many  widths  as  full  size  s\-mbols.  E\'en 
with  the  built-in  graphics  symbols,  the  bar  graph  won't 
look  perfect,  since  small  gaps  in  the  bar  graph 
silhouette  will  exist  with  ihesc  symbols.  The  best 
approach  would  use  a  mixture  of  built  in  graphics 
plus  a  special  character  at  the  end  of  the  bar  to 
give  a  continuous  silhouette. 
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62020 

62030 

62040 
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REM    RLTERHHTE    SUBROUTINE    FOR    PLOTTING   URTfl    flS    fl    '! 
REM    nX    flHIi    DV    MUST    HAVE    BEEN    DEFINEn    FV    THE    MR  IN 

GOSUB    61900 

V=V-DV - GOSUB    6 1 008 

GOSUB    61008 

GOSUB   61008 

X=X+riK  ■■  GOSLfB    €  1 000 
TO    ORIGINRL 


:MRLL    + 
PROC-iRRM 


v=v-niv 

V=V+DV 

V=V-DV 

REM  RESTORE 

X-X-BK 

RETURN 


'v'RLUE  BEFORE  RETURNING 
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DOWNEY,  CA. 

(213)  923-9361 


Data  Equipment  Supply  Corp. 
8315  Firestone  Blvd..  Downey,  CA  90241 


^  commodore 


SOLID  GOLD  SOFTWARE® 

DES's  own — 2  years  preparation!  Writing, 

testing  and  updating  to  be  sure  our  software 

deserves  this  lable. 

•  FULL  ACCT.  PACKAGE SI600.00 

ACC/SYS  GA  104  (32K)  9  DISKS 

For  accounianls  &  small  businesses 
(Sold  locally  only  for  non' — to  give  customer  full  suppori) 

•  LAWYERS  Package  #1  (32K)  Disk,.  .SI  200.00 

6i  Allorneys,  5200  clients  (200  mailers  ea) 
Prelim  &  Final  Statements,  Aging,  Mgmt  Rpts 

•  CHEMISTRY  PROFILE  (16K) S350.0O 

A  blood  analysis  program  that  yields  a  diagnosis 

based  on  29  blood  tests  (higk-normal-tow) 

•  MLS  (32K  mm.)  Disk $1 200.00 

(Property  avail,  sold,  by  city  £  zone,  mg'mt 
analyst  rpts,  buyer  &  seller  rpts,  etc.) 

"GOLD  PLATED  SOFTWARE®" 

SPORTS 

•  HOCKEY  #1  (Disk) $29.95 

Compiler  for  hockey  statistics — excellent  for  team  and 

league  managers.  (When  tested  on  a  17  team  league 
SA  VED  20  hours  a  week  of  record  keeping) 

•  BASEBALL  #!  (see  Hockey)  {D\%^) $29.95 

BUSINESS 

•  MAILFNG  LIST  L0(16K  min.) S29.95 

Maintains  file  and  printout 

•  MAILING  LIST  2.0  (16K  min.) 549.95 

More  powerful  plus  file  merging 

•  SUPER  LIST(8K  min.) $19.95 

(Advanced  listing  features) 

•  CALENDAR  |8K  min.) $19.95 

(Perpetual  calendar  with  printout) 

•  PHONE  MAIL  SYSTEM  (16K  mm.).  ...  $49,95 
CBM  Printer  (IVord  processing  plus  phone  book) 

EDUCATIONAL 

•  FLASH  CARDS  ( 16K  min.) 524.95 

Multi  "user  input"  quiz  -  great  study  aid 

•  MATHEMATICS  (8K  mjn) '  .  .  S7.95  ca 

A)  Add  B)  Sub!  C)  Slulti  D)  Div 

•  "BRANOrS  SPELLING  BEE"(8K  min).  .  .  S9.95 

(SiPERB  Aid  Pre-School  -  2nd) 

•  VISUAL  PERCEPTION  (8K  min) S7.95 

Shapes  dc  Sizes 

•  CONSONANT  BLENDS  (8K  min)  57.95 

2  leller  sound  combinations 

•  COUNTING  1  to  9  (8K  mm) S7.95 

I'isual  —  tutorial 

GAMES 

•  MAY  1941  (KK  mm.) 524.95 

Simulated  tracking  A  sinking  of  the  Bismarck 

•  SIMON  |8K  min.) S7.95 

Duplicates  the  numbers  <S  sounds  selected 

•  GUESS??  (KK  mm.) S7.95 

Full  graphic  sound,  guessing  game 

•^  " I'hc  Einesi  Software  Crew  in  the  H'orld""^ 

Mike  Ric titer  Norm  &  Brad  Hanscnm  S>  Elsaycss 

Dtnid  Sctiuan/  Donna  Schlieper  Bob  Johnson 

Da^c  LundhcriL  .Miir.li  Kalmyaprak.  Hcnr\  Kluka 


SUPPLIES 

(WE  PLAN,  WITH  OUR  PRICES. TO CORNERTHE  MARKET)! 

DISKETTES  (FLOPPIES) 

BASF  {5W'  &  8") S2.90  ea. 

MEMOREX  iS'A"  &  8") 2,90  ea. 

WABASH  (8") 2.65  ea. 

DYSAN  {5''4"  &  8") 4.90  ea. 

CASSETTES  (Digital  &  Audio) 

BASF (C30  -  .90«;  C60  ^  S 1 .20; 

C90-  S1.50;C120-$1.75) 

KEYLINE  (Digital  Only) $5.75 

RIBBONS 
CENTRONICS 

101  &301 $6.15 

TALLY  (2 100  &  2200) $3.95 

DIABLO 

Hy  Type  I $4.00  &  up 

Hy  Type  II $5.00  &  up 

TELETYPE  #2,  #13  (use  on  CBM) S2.95 

QUME 53.95 

PRJNTRONICS 510.25 

DEC  LA30  -  54.25  /  LA  180 55.25 

PRINTER  PAPER  (  v^  us  for  case  prices) 

9^7  X  1!  (perfs  to  84  x  ll)500sh(s $7.95 

141.  X  II  500shls $9.95 

Your  Complete 

Computer  Center 

-SEND  FOR  DESCRIPTIVE  BROCHURES- 
ALL  AVAILABLE  ENGLISH/ARABIC 


Dp    DATA  EQUFPMENI  SUPPLY  CORP. 

S      8315  Firestone  Blvd.,  Downey,  CA  90241 
(213)  923-9361 


PAYMENT     (Calif.  Residents  add  6%  Sales  Tax) 

□  CHECK  # 

a  VISA 

D  MASTERCHARGE        Exp.  Date 

Acct.  #  

Name 

Address     

City     

State       -Zip 
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ASSEMBLY  SYSTEM 


Assembly  System  II  is  the  most  affor- 
dable and  most  comprehensive  mne- 
monic assembler  package  available 
lor  your  PET  personal  computer  or  CBM 
professional  computer.  This  package 
consists  of  two  programs.  The  Assembler 
is  the  most  soplusticoted  assembler 
available  in  Basic,  One  program  a Uov/s 
the  input,  editing,  saving,  recalling,  and 
listing  of  standard  MOS  machine  lan- 
guage programs.  A  user  proof  entry  sys- 
tem makes  mistakes  almost  impossible. 
Relative  branches  are  automatically 
computed  by  the  program,  minimizing 
user  error.  Fast  and  efficient,  this  one 
program  does  it  all.  You  do  not  have  to 
go  through  a  3  program  process  to 
.  compile  your  code.  All  coding  is  assem- 
[ftSsemBLER  3001  Foa  flK  PETs still  ttJ^KuBa  hjr  $  15.95 

•  AUTOMATICALLY 

•  COMPUTES  BRANCHES 

•  FASTEST  ASSEMBLER 


T 


bled  directly  mlo  memory  lor  easy  test- 
ing and  access  vid  the  built-in  TIM 
monitor.  Code  can  be  executed  via 
both  the  SYS  and  USR  calls.  Operands 
are  accepted  in  both  decimal  and  hex- 
adecimal format.  Assembly  System  II  is 
compatible  with  all  6502  programming 
manuals  and  books.  The  Disassembler 
can  unload  from  memory  and  directly 
from  tape  or  disk,  A  program  does  not 
hove  to  be  in  memory  for  a  compiete 
disassembly  to  screen  or  printer.  Now 
you  can  take  a  look  at  those  machine 
language  routines  that  hove  been  hid- 
ing from  view.  Assembly  System  II  is 
available  lor  disk  or  cassette  (spec- 
ify) based  Commodore  PET/CBM  com- 
puters   for    an    introductory   price   of 

$25.95.    (NEEDS  AT  LEAST  16K)     
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ANOTHER  PET  •  mos  mnemonics  J 
PROGRAMMING  •  full  disassembly  i^ 
BREAKTHROUGH  •  hex/decimal  operand| 

305  RIVERSIDE  DRIVE,  NEW  YORK,  NEW  YORK  10025    } 
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UN-NEW 


Brett  Butler 


erases  a  pi'ogram 


Have  you  ever  liad  thai  'sinking  feeling'  alter  you 
typed  in  'NEW  and  suddenly  realized  that  you  jiisi 
wi])ed  out  your  latest  jirograiii  and  had  neglecteti  to 
save  it? 

We  all  know  ihai  a  'NEW 
from  memory  right.  .  .? 

Well  not  exactly,  as  lar  as  PET  BASIC  is  con- 
cerned it  has,  bui  the  old  program  is  still  actually 
in  memory,  only  the  variable  puiniers  and  the  llrst 
'line  link'  of  the  program  chain  have  been  destroyed. 
Now,  as  long  as  you  have  not  input  a  new  Basic 
line  or  a  direct  statement  using  a  variable,  'UN- 
NEW  will  recover  that  lost  program,  by  rebuikiiiig 
the  chain  and  restoring  the  variable  pointers. 

'UN-NEW  is  a  machine  language  program 
which  resides  in  the  '2nd  cassette'  buffer  occupying 
only  62  bytes  (SO33A-$0377). 

The  assctnbly  listing  below  shows  that  we  start 
searching  from  the  begimiing  of  Basic  Te.x!  ($0405)  for 
a  single  zero  byte  indicating  the  enti  of  the  first 
Basic  line;  w^hen  found  we  increment  one  location 
more  and  store  this  address  in  location.s  S0401 
-I-  $0402,  our  first  'line  link';  this  restores  the 
chain  ol  the  program  and  now  only  requires 
that  we  lind  the  End  of  Basic  and  set  the  variable 
pointers.  Since  all  Pet  Basic  programs  termi- 
nate in  three  (3)  zero  bytes,  our  search  begins 
at  the  Start  of  Ba.sic  ($0401)  and  keeps  counting 
until  the  third  consecutive  zero  byte  is  found; 
when  this  is  done  we  increment  tme  location 
past  and  store  this  address  in  all  the  variable 
pointers. 

To  use:  load  "UN-NEW/SYS826"  and  type  'SYS826' 
(RETURN)  PET  will  respond  with  READY,  and 
that's  it.  Your  program  has  been  recovered. 
To  save:  For  UPGRADE  ROM's,  call  the  MLM  and 
enter  the  HEX  coding  at  the  locations  shown 
and  then  type 

.S  "UN-NEW/SYS826",  01,033A,0378 
For  original  ROM's,  load  the  MLM  from  tape,  enter 
the  HEX  coding  as  per  above,  ensuring  that  values 
$2A  thru  $2F  are  replaced  with  S7A  thru  $7F 
respectively  then  type 

.S  01,  "UN-NEW/SYS826",  033A,0378 
'UN-NEW  is  short,  simple  and  easy  to  save. 
Hopciully,  you  will  never  have  to  use  it  but  if  you 
need  it  just  once,  its  well  worth  the  elfori  to  save 
before  hand. 


;FOR  OLD  ROMS 

;  REPLACE  LOCATIONS  S2A  THRU  S2F  VJITt; 

;S7A  THRO  S7F  RESPECTIVELY 

START 

0  3     MORE 


03 


e33A 

A9 

Qi 

033C 

B5 

2E 

033Ii 

B5 

2F 

D34fl 

Afl 

QQ 

D342 

20 

6F 

D34S 

D0 

FB 

0347 

20 

6F 

D34A 

A  5 

2E 

LDA 

#$D4 

; START 

STA 

52E 

; SEARCH 

STA 

S2F 

LDY 

«S00 

JSR 

SCAM 

BNE 

MORE 

JSR 

SCAH 

LDA 

S2E 

; INSERT 

034C 

BD 

01 

04 

ETA 

.?D40I 

034F 

A5 

2F 

LDA 

S2F 

0351 

BD 

02 

04 

STA 

S04D2 

0354 

A  9 

01 

LDA 

#S01 

0356 

85 

2A 

,-KOW  LOOK 

STA 
FOR  EK'D  OF 

$2A 
BASIC 

0358 

A2 

03 

KOTEKD 

LDX 

(iS03 

035A 

20 

6F 

G3 

LOOK 

JSR 

SCAH 

035D 

DO 

F9 

BNE 

MOT END 

035F 

CA 

DEX 

0360 

DB 

FB 

BNE 

LOOK 

0362 

2  0 

6F 

03 

JSR 

SCAN 

;SET  ALL 

VARIABLE  POINTERS 

0365 

A2 

03 

LDX 

SS03 

0367 

B5 

2C 

FILL 

LDA 

S2C,X 

0369 

95 

2A 

STA 

S2A,X 

036B 

CA 

DEX 

036C 

IE 

F9 

BPL 

FILL 

D36E 

60 

RTS 

E36F 

E6 

2E 

SCAN 

INC 

S2E 

D371 

DO 

02 

BNE 

OVER 

3373 

E6 

2F 

INC 

S2F 

0375 

Bl 

2E 

OVER 

LDA 

(S2E),y 

0377 

60 

RTS 

Review 

PH-001  2114  RAM 
ADAPTER 


Harvey  B.  Herman 


Optimized  Data  Systems 
P.  O.  Box  595 
Placentia,  CA  92670 

$24.95  Assembled  with  one  2114  and  two 

sockets 

$13.95  Kit  with  parts  (no  2114s) 

$  8.95  Printed  circuit  board  only 

Many  "old"  8K  PETs  used  22  pin  6550  RAM 
memory  chips  on  their  circuit  boards.  These  chips, 
at  one  time,  may  have  been  difficult  to  obtain  and 
even  today  cost  more  than  competitive  versions 
(e.g.  2114s).  Substitution  of  2114s  (at  least  half  the 
cost  of  6550s)  has  heretofore  not  been  possible  as  the 
chips  are  not  pin  compatible.  The  circuit  board  adapter 
reviewed  here  is  intended  to  allow  one  to  substitute 
2114s  for  6550s  on  the  "old"  PET  circuit  board. 

I  found  the  adapter  easy  to  install  and  in  my 
tests  peribrmcd  as  expected.  It  allows  substitution 
of  up  to  8-6500s  (of  a  total  of  16)  with  just  one 
circuit  board.  Two  adapters  may  be  used  to  replace 
all  6550  chips  desired.  The  adapter  can  be  installed 
immediately  with  the  original  6550s  before  any  failure 
occurs  -  a  nice  feature. 

I  can  see  a  real  value  for  this  product  if 
you  are  having  trouble  obtaining  6550  memory 
chips.  Almost  anything  to  keep  our  PETs  healthy 
is  worth  it.  However,  if  you  have  a  reliable  source 
for  the  6550  chip  then  the  adapter  will  only  be  cost 
effective  after  replacing  2  or  3  chips.  If  one  had 
several  PETs  this  might  not  take  an  excessive  amount 
oi  time.  I  would  consider  this  product  carefully  if 
you  only  own  one  PET  and  have  no  trouble  ordering 
the  original  memory  chips.  With  these  reservations, 
I  recommend  the  adapter  to  all  "old"  8K  PET  owners. 
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Skylcs  Electric  Works 


Old  PET  or  New  PET... 
Expand  Its  User  Memory  Now! 

...up  to  40K  with  the  precision  made  Skyles  Memory  Systems 

The  printed  circuit  board  adapter  connects  directly  to  the  data  bus  on  your 
PET,  with  ribbon  cable  and  50  pin  connector  that  keeps  the  data  bus  open  to 
the  outside  world.  Installs  in  minutes  without  special  tools  or 
equipment. ..you  need  just  an  ordinary  screwdriver. 

Three  Skyles  Memory  Expansion  Systems  to  choose  from:  8K,  16K, 
24K.. .allowing  the  2001-8  to  be  expanded  to  32K,  the  new  BN  also  to  32K, 
the  new  16N/32N  and  16B/32B  PETs  to  40K.You  can,  at  any  time,  increase 
your  PET'S  memory  by  8  kilobye  increments  up  to  the  limits  indicated.  Let 
your  PET'S  user  memory  grow  on  you,  8K  at  a  time. 

Each  System  now  comes  complete  with  a  test  cassette—at  no  extra  cost--for 
testing  high  speed  read-write  and  low  speed  memory  retention. 

At  the  great  prices  you  should  always  expect  from  Skyles: 

8KM  8K  Memory  Expansion  Board  $200.00* 

16KM  16K  Memory  Expansion  Board  400.00* 

24KM  24K  Memory  Expansion  Board  600.00* 

PMA-8  Memory  Adapter  for  2001-8  50.00* 

PMA-16  Memory  Adapter  for  8N  and  8B,  16N/32N  and  16B/32B       50.00* 

Note:  All  Memory  Expansion  Boards  require  a  Memory  Adapter. 


We're  so  sure  of  ourselves, 
we're  guaranteeing 
all  complete  Skyles 
Memory  Expansion 
Systems  for  a  period 
of  16  months! 


'California  residents-  please  add  6%  or  6  5°b  sales  lax  as  required 
VISA,  MASTERCHARGE  ORDERS  CALL  (800)  538-3083  (except  California  residents) 
CALIFORNIA  ORDERS  PLEASE  CALL  (408)  257-9140 


Skyles  Electric  Works 


231  E  SouthWhisman  Road 
MountainViow,CA  94041 
(408)735-7891 
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Disk  ID 
Changer 

Rene  W.  Poirier 


When  I  initially  started  witli  the 
2040,  and  would  "NEW"  a  diskette, 
the  name  and  ID  number  were 
grabbed  out  of  the  sky.  No  system 
of  naming  or  numbering  came 
to  mind  at  that  time.  Later,  I  found 
that  this  system  of  no  system  proved 
to  be  a  nuisance  in  building  a  library 
that  made  sense. 

This  program  allows  one  to 
change  either  the  name  or  the  ID 
number  on  an  in-use  diskette 
without  disturbing  the  files  on  the 
diskette.  Thus,  a  "working  disk" 
can  be  easily  renamed  to  a 
"library  disk",  etc. 

It  also  allows  the  ID  of  a  dup- 
licated or  "backup"  diskette  to  be 
changed  to  a  different  ID  number 
than  the  original.  Commodore 
mentioned,  in  a  recent  bulletin  to 
dealers,  the  possibility  of  errors 
in  creating  the  BAM  when  initia- 
lizing a  diskette  with  the  same  ID 
number  as  the  diskette  just  removed 
from  that  drive.  Changing  the  ID 
number  on  backup  diskettes  with 
this  program,  or  by  parts  of  it  being 
incorporated  into  a  duplication 
routine,  will  prevent  this 
problem  from  occuring. 


CHARACTERS  ON  A 


1  REM  ***   DISK  ID  CHANGER 

2  REM  ***   BY  RENE  W.  POIRIER 

3  REM  ***   BERLIN,  N.H. 
4 
5 
6 
7 

10  OPEN9,B,0:PK=PEEK(5946e) : POKE59468 , 12 
20  PRINT"l^'i■l^^THIS  PROGRAM  IS  TO  CHANGE  THE  ID 

-■DISK"; 
30  PRINT"ETTE,  OR  CHANGE  THE  DISK  NAME 
40  PRINT"if[JSE  WITH  CAUTION!" 

50  PRINT'^^-f-ON  WHICH  DRIVE  SHALL  WE  PERFORM  THE  CHANGE?  (0/1)  r" ;  : 
60  IMPUT*9,DV5: PRINT :DV=VAL{DV$) : IFDV<0ORDV>lTHENPRINT"iT T T T " ; :GOTO5  0 
65  IFDV=0ANDDV5<> "0 "THENPRIKT"rT T  T  T " ; :GOTO50 

70  PRINT"+DO  YOU  VflSH  TO  CHANGE"TAB ( 44) "il f )  ID  CHARACTERS 
75  PRINTTflB(4)  "j:2f)  DISK  NAME 
80  PRINT"   ENTER  (1/2)      x" ;: INPUT#9 , Q$ : PRINT : Q=VAL (Q$) : IFQ<10RQ>2TH 

-.EN70 
90  OPEN15,8,15:PRINT*15, "I"+DVS 
100  0PEK1,8,3,  "#":PRINT"iT^Tt'+" 
110  PRINT#15 , "Ul : 3 " ; DV; " , 1 8  ,  0 " 
120  ONQGOTO14O,500 
140  PRINT#15,"B-P:3,162 

150  GET*1,A5,A1S:PRINT"THE  PRESENT  DISK  ID  IS: 
160  IFA$<>"B"THENA$="B": 
170  A15=CHR5(ASC(A1$)+1) 

180  PRINT"THE  NEW  DISK  ID  I  HAVE  CHOSEN  IS: 
190  PRINT"IS  THIS  ACCEPTABLE?  (Y/N)  x." 
200  IPQS="Y"THEN230 
210  IFQS<>"N"THEN190 
220  PRINT"'^WHAT  DISK  ID  DO  YOU  DESIRE?  i" ;: INPUTI9 , NID5 : PRINT 


Jl"ASA15 


j:"ASA1$:NID$=A$+A15 
:INPUT#9,QS:PRINT 


A  DISK  ID! ' 
jl": 


: GOT02  2  0 


225  IFLEN(NID?) <>2THENPRINT"rN0T  ACCEPTABLE  AS 
230  PRINT"SHALL  I  SEND  THAT  TO  THE  DISK?  (Y/N) 

INPUT* 9, Q?; PRINT :IFQS="Y"THSN400 

IFQS<>"N"THEN220 
250  CLOEEl :CL0SE15 : POKES 9468, PK: END 
400  PRINT#15, "B-P:3,162" 
410  PRINTS1,NIDS; 
420  PRINTS15, "U2;3";DV; ",18,0" 

I5="I"+KID$(ETRS(DV) ,2) : PRINT* 15, I? 

PRINT"Fit'*-DISPLAY  THE  DIRECTORY  TO  SEE  IF  THE  DISKID  HAS  BEEN  -i 
-.CHANGED"; 
450  PRINT"  CORRECTLY, 

460  PRINT"+I'K  ASSUMING  THAT  THE  WEDGE  HAS  BEEN  INITIALIZED 
470  PRINT"+i'f■l^>$"MID?(STR5(DV)  ,2)  :PRINT"TTTT" 
480  POKE158,l:POKE623,13 
490  END 

500  PRINT#15, "B-P:3,144 

510  DNA$= " " t F0RI=1 T016 : GET# 1 , A5 : DNA5  =  DNA$+A$ ; NEXT 
520  PRINT"+THE  PRESENT  DISK  NANE  IS:  r"TAB (44) ;DNA$ 
530  PRINT"+DO  YOU  WISH  TO  CHANGE  IT?  (Y/N)  t" ;: INPUT#9 ,Q?: PRINT; 

-.IFQS="Y"THEN600 
540  IFQ5<>"N"THEN520 

550  CL0SEl:CL0SE15:PRINT"t++END":P0KE  59468, PK:END 

600  PRINT"+ENTER  NEW  DISK  NAHE"TAB ( 40 ) "LIMIT  TO  16  CHARACTERS  n"; 
605  INPLrT«9,NDN5:  PRINT: 
610  IFLEN(NDN5) >16THENPRINT"tiN0T  ACCEPTABLE 


235 
240 


430 
440 


620  NDNS=LEPT5(NDN$+" 

630  PRINT"'*■l^SHALL  I  SEND  r"NDNS 

640  PRINT"TO  THE  DISK  ON  DRIVE  "DV"? 

650  IFQS="Y"THEN700 

660  IFQ?<>"N"TKEN630 

670  GOTO550 

700  PRINT#15, "B-P:3,144" 

710  PRINT#1,NDNS; 

720  PRINT#15,"U2:3";DV;",18,0" 

730  GOTO430 


TOO  LONG":GOTO600 


M6) 


(Y/N)  r.";  :INPUT#9,Q$:  PRINT: 


© 
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MICRO 
COMPUTER 

INDUSTRIES, 
LTiE>. 

INVENTORY  CONTROL  WITH 

POINT  OF  SALE 

FOR  CBM  AND  PET  32K 

DISK  VERSION  INCLGDES:  Storage  of 
2500  items  per  diskette,  Accounts 
Receivable,  Writes  Purchase  Orders, 
Invoices,  Summaries,  Post  Income  and 
will  Sort  by  10  fields. 

$100.00 

INVENTORY  CONTROL  8K 

CASSETTE  VERSION  INCLGDES: 
Purchase  Order  program  and  Printing 
functions. 

$   39.00 

GENERAL  LEDGER 

DISK  VERSION  INCLUDES:  The  total 
functions  of  the  Inventory  Control  pro- 
grams plus;  Accounts  Payable,  Notes 
Payable,  Purchases,  Expenses,  it  also 
issues  complete  Reports,  Statements 
and  Summaries. 

$350.00 

Instruction  Manual  $10.00  refundable 

with  purchase. 


MICRO  COMPUTER 
INDUSTRIES,  LTD. 

1520  East  Mulberry  Suite  240 

Fort  Collins,  Colorado  80524 

1-303-221-1955 
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=  jRoiM^eii^fiUJl  PET  Products 

from 

OPTIMIZED  DATA  SYSTEMS! 

-  AVAILABLE  NOW  - 
(Prices  include  Shipping) 

•  WORD  PROCESSOR $16.95 

Makes  documents  a  snap 

•  MAILING  LIST $16.95 

Throw  away  your  address  book 

•  SPACE  EATER $  7.95 

Gobbles  spaces  in  BASIC  programs 

•  CATALOG $16.95 

File  stamp/coin  collections 

•  SATELLITE  TRACKER $24.95 

Tracks  OSCAR  Ham  Satellite 

•  MORSE  CODE  KEYER $14.95 

Sends  code  for  real  or  practice 

-  IN  THE  PIPELINE  - 

•  More  REAL  WORLD  SOFTWARE 

•  2114  RAM  ADAPTER 

•  LOW-COST  MASS  STORAGE 

•  INTELLIGENT  KEYBOARD 

WRITE  FOR  DETAILS  -  NOW! 

P.O.  Box  595,  Placentia,  CA  92670 

(PET  is  a  Trademark  of  Commodore  Business  Machines) 


COPYRIGHT  1980 


PET 
RABBIT 


Load,  Save,  Verify,  Execute 
8  K  in  38  seconds  versus 

PETs  2  Minute  45  seconds, 
plus  more! 

High-speed  Cassette  Routines  work  with  8K,  16K,  or  32K 
new  ROM  PETs  which  have  the  new  Commodore  cassette 
deck  (like  the  external  verjsion  which  sells  for  $95.00). 
Note:  If  you  have  a  new  ROM  PET  with  the  old  style 
lift-top  deck,  everything  but  the  high-speed  cassette 
routines  will  work. 

—  Auto  repeat  of  any  key  held  down,  toggle  character 
set. 

—  RAM  Memory  Test,  convert  #'s  to  hex  and  decimal, 

12  Rabbit  Commands 

Note:  Rabbit  is  2K  of  machine  code  at  $1800  for  8K  PETS, 
$3000  or  $3800  for  16K  PETS,  or  $7000  or  $7800  for  32K 
PETS,  (Specify  one  of  the  5  versions.) 

Cassette  and  Manual  -  $29.95  (Add  $5.00  for  foreign) 

Eastern  House  Software 

Phone  [919]  748-8446  or  924-288!) 
3239  Linda  Dr.  Winston-Salem,  N.  C.  27106 
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SHIFTWORK 

Jim  Butterfield,  Toronto 

The  SHIFT  keys  on  the  PET  are  pretty  straight- 
forward, right?  Hold  either  one  down  while  you  hit 
another  key,  and  you  get  the  key's  shifted  equivalent: 
upper  or  lower  case  or  a  graphic.  Not  much  to  be  said 
there. 

Well,  maybe  one  or  tw'o  things.  ,  . 
Shifted  Return 

RETURN  does  two  jobs:  it  takes  you  to  the  start 
of  the  next  line,  and  it  executes  the  line  you're  leaving. 

Sometimes  you  don't  want  to  execute  the  line. 
You're  just  drawing  a  picture  on  the  screen.  When 
you  hit  RETURN,  the  computer  will  take  that  part  of 
the  Klingon  attack  vessel  you've  just  drawn  and  try  to 
execute  it  as  a  Basic  Command;  you  get  PSYNTAX 
ERROR,  which  doesn't  help  your  picture  much. 

Other  times,  you  have  a  Basic  line,  but  you  don't 
want  to  execute  it  yet.  Maybe  you've  got  a  little 
muddled  up  with  the  programmed  cursor,  and  every 
time  you  try  to  back  up  the  cursor  to  fix  things,  you 
get  another  unwanted  graphic.  You  don't  want  to 
press  RETURN  and  enter  this  botched  line  into  your 
program  before  you  have  a  chance  to  fix  things  up. 

Just  hold  down  SHIFT  as  you  press  RETURN 
and  you'll  go  to  the  next  line  without  trying  to 
execute  what  you've  just  done. 

Shifted  Space 

When  you  press  SPACE,  the  PET  prints  a  space. 
When  you  hold  down  the  SHIFT  key  and  press 
SPACE,  the  PET  prints  a  space.  Same  thing.  The 
shifted  SPACE,  however,  is  a  different  character  on 
the  screen.  Looks  the  same,  but  it's  not  a  true  space. 
How  can  you  use  this?  Here's  one  very  handy  applica- 
tion. Suppose  you  want  to  do  an  INPUT  and  don't 
want  the  user  to  accidentally  stop  the  program  by 
typing  RETURN  without  input.  Shifted-space  will  do 
the  trick.  Try  this  tiny  program: 

10  INPUT  "  (see  note  below)  ";X$ 

20  PRINT  "THANK  YOU.":GOTO  10 

Here's  what  to  put  between  the  quotes  on  line  10. 
After  you  type  the  first  quote  mark,  hold  down  the 
shift;  type  three  spaces;  type  three  cursor  left  charac- 
ters. Now  release  the  shift  and  complete  the  line, 
starting  at  the  second  quote  mark. 

I  call  this  program  ABUSE.  After  a  hard  day  at 
the  computer,  you  can  put  this  one  in,  and  proceed 
to  call  it  every  name  under  the  sun.  Ii  will  thank 
you  and  ask  for  the  next  insult. 

The  interesting  thing  is  that  the  program  won't 
stop  if  you  press  RETURN  without  input.  That 
invisible  shifted-space  that  you  have  printed  to  the 
right  of  the  question  mark  is  a  genuine  input 
character.  If  you  don't  write  over  it  with  your  own 
information,  it  will  be  accepted  as  input,  and  the 


program  won't  stop.  Instead,  it  will  humbly  thank 
you  . .  for  nothing. 

Pseudo-shifted  characters 

There's  a  group  of  characters  that  you  can't  input 
via  keyboard/screen  but  which  are  useful  in  certain 
types  of  file  handling.  The  shifted  RETURN  is  also 
uscl'ul  in  this  application. 

Here's  the  problem.  When  you  use  the  INPUT# 
statement  for  receiving  data  from  tape  or  disk,  the 
input  procedure  stops  on  three  characters:  comma, 
colon,  and  RETURN. 

This  is  annoying  when  you're  trying  to  input 
names  from  an  address  list  like  DR.  ALOYSIUS 
CHIP,  PHD  or  HORACE  SCHMEDLAMP,  JR.  or 
have  address  lines  like  ATTENTION:  MURPHY. 
The  input  routine  neatly  drops  the  PHD,  JR.  and 
MURPHY;  and  you're  left  to  scratch  your  head 
over  why  the  data  disappeared. 

Relief  is  in  sight.  If  you  can  catch  the  comma  or 
colon  before  you  write  it  to  the  file,  just  change  it 
to  its  shifted  equivalent  by  adding  64  decimal  to  the 
ASCII  value.  It  takes  a  little  more  work  when  you 
write  it'  but  it  saves  work  and  puzzlement  when  you 
read  it  back  later.  The  general  technique  for  a  single 
character  is: 

A   =  ASC(A$)  :  IF  A  =  44  OR  A  =  58  THEN 

A$=CHR$(A-h64) 

You  can  write  the  re-formed  AS  to  the  file  and  feel 
secure  that  it  will  come  back  w'ithout  trouble  and 
print  correctly. 

Exactly  the  same  thing  can  be  done  with  Cjuota- 
tion  marks.  The  input  routine  assumes  that  ordinary 
quote  marks  are  there  so  that  they  can  be  removed 
before  you  see  the  string.  There's  a  good  reason  for 
this,  but  it  doesn't  help  you  when  you  really  want 
them  to  be  there  and  part  of  the  input  data.  Once 
again,  shift  the  quote  by  adding  64  to  it.  Since 
quotes  are  often  directly  program-generated  (rather 
than  input),  you  can  just  use  CHR$  (98)  instead 
ofCHRS(22). 

Occasionally,  you  inay  want  to  input  two  lines 
at  a  time  from  a  file.  The  shifted-return  will  do 
the  trick.  Oddly  enough,  you  must  add  128  to  the 
RETURN  to  make  a  shifted  return:  it's  CHRS(14I). 
This  always  works  great  if  your  output  goes  to 
the  screen.  If  you're  using  a  printer,  however, 
check  it  out  to  make  sure  it  recognizes  the  shifted- 
return  and  does  the  right  thing. 

Afterthought 

Before  I  leave  you  to  shift  for  yourself,  try  this 
last  little  keyboard  curiosity.  Hold  down  both  shift 
keys.  Now,  with  your  third  hand,  or  nose,  or  what- 
ever, try  pressing  a  few  keys  on  the  left-hand  side 
of  the  keyboard:  Q,  A,  S,  Z. 

I  don't  know  why  you  get  the  odd  characters. 
There's  probably  a  moral  here:  two  shifts  are  not 
better  than  one?  Too  many  shifts  spoil  the  keyboard? 
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APPenaing  disk  rlleS  Department  of  Chems^ 

■^  "^  ^  Stanford  University 


The  attached  machine  language  routine  pro- 
vides a  very  useful  tool  for  those  who  have 
been  frustrated  (as  I  have)  at  the  inability 
of  the  current  disk  operating  system  (DOS) 
of  the  Commodore  2040  Dual  Drive  Disk  to 
append  programs.  Although  firmware  recently 
introduced  by  Palo  Alto  IC's  (The  Program- 
mer's Toolkit)  provides  some  relief  to  those 
who  require  a  convenient  appending  pro- 
cedure, it  suffers  a  serious  drawback.  The 
system  operates  only  by  appending  a  tape 
file  to  a  program  already  in  memory.  Thus, 
it  becomes  necessary  to  first  save  program 
pieces  to  tape  and  then  reload  these  in  proper 
sequence  using  the  append  command.  Since  1 
was  reluctant  to  use  this  slow  tape  file  pro- 
cedure, I  searched  for  alternatives  involving 
disk  files. 

A  little  investigation  of  the  DOS  com- 
mand, Copy,  reveals  that  this  instruction  goes 
a  long  way  toward  solving  the  problem.  Basic 
is  stored  in  memory  starting  at  location 
10401.  The  first  two  bytes  are  forward 
pointers  to  the  next  line  of  code  (stored  by 
the  usual  6502  convention  of  low  byte/high 
byte).  Locations  $0403  and  $0404  store  the 
line  number  for  this  first  line  of  basic.  The 
ASCII  Code  for  this  line  is  stored  beginning 
at  location  $0405  and  ends  with  the  delimiter  zero. 
The  next  byte  begins  the  second  line  of  basic  and  is 
stored  at  the  location  pointed  to  by  the  forward 
pointers  at  locations  $0401  -  $0402  described  above. 
By  following  the  forward  pointers  from  line  to  line, 
one  eventually  reaches  the  end  of  the  basic  code.  Th 
event  is  signaled  when  the  forward  pointers  are  zero 

When  the  DOS  Copy  command  concatenates 
two  disk  files,  the  zero  page  values  indicate  that 
both  programs  were  combined;  however,  listing  the 
concatenated  program  reveals  only  the  first  program 
The  second  program  for  all  purposes  remains 
invisible  to  the  basic  interpreter.  This  is  because 
the  forward  pointers  of  the  first  program  eventually 
point  to  the  two  delimiters,  zero,  and  at  this  point 
the  end  of  basic  is  signaled.  The  next  two  bytes  are 
pointers  to  the  start  of  basic  text  for  the  second 
program  as  originally  saved  to  disk.  If  the  first  line 
of  the  second  program  is  moved  forward  in  meinory 
by  four  bytes,  then  the  last  line  of  the  first 
program  will  point  to  the  first  line  of  the  second 
program  and  the  linking  process  will  be  nearly  com- 
plete. In  order  to  finish  the  linking  procedure,  the 
forward  pointers  of  the  second  program  must  be 


ecu; 

OOCtO 

+   = 

*033m 

8617 

033m 

m3 

FF 

STiiPT 

LDli 

IIJFF 

.SETUP  TO  FlIJD  FROGSfiM  HELIMITE 

MIS 

033C 

85 

I] 

iTli 

i:i 

0613 

e33E 

35 

12 

JTh 

J12 

Beae 

6340 

ie 

2C 

C-5 

.'iP 

JC52C 

-ROM  FIHl'  LINE   »  POUTISE 

0021 

6343 

20 

6C 

03 

Jif 

EllPIfiS 

CHECI    Fl*:  EUD   OF   IflJlC 

Be2j 

0346 

FO 

21 

iEO 

CCiME 

■  VES,    E.;lr  hND  PPJUT   PEflliV 

0623 

034S 

H5 

5C 

LIiM 

»5C 

■CURREUT   LIME 

emii 

e34fl 

L0 

02 

liHE 

•iHF 

ee25 

034C 

M 

5D 

HEt 

i5rr 

;I10VE   MCh    OIIE   fVTE 

aes6 

a34E 

cs 

5C 

ikjF 

HEC 

tjC 

8827 

635S 

(0 

60 

LIiM 

ttas 

e-e^e 

035i 

Re 

04 

LIiV 

•  :F04 

■JETUP  FOP  4  LOOfi 

ees 

8354 

91 

5C 

S7m 

■*sc:!,v 

■iTfpPE  HEW  PROGRftn   DELIMITER 

0636 

63M 

n» 

ie 

LIM 

•J26 

•  LOflri  mSCH  SLftV. 

M31 

6353 

89 

DEV 

6832 

6353 

91 

5C 

nMlU 

iTri 

.(SC.'.V 

STORE   ELHllKS 

0633 

035B 

S6 

[EV 

oaj4 

035C 

16 

FJ 

ifL 

ft&flKI 

6035 

e35E 

20 

72 

C5 

.tSR 

IC-572 

Ron      CLP-      ROUTINE 

6636 

0361 

;e 

42 

C4 

JiP 

lp;442 

.POM  Fl-;  CHHINIMO  piJUTIIIE 

6037 

6364 

26 

tC 

OS 

.liF: 

EMDlifli 

CHECt    FOR  EMB  OF    hnlic 

aass 

0367 

no 

11 

|:uE 

START 

-l=j  /ie;;t  pft^^cpR^r  jp  nviE 

663S 

6369 

4C. 

ii 

C3 

HOME 

JUP 

icsai 

,   E;.!T  to  JmSIC 

eeje 

e36C 

3S 

ENDBfiS 

JEC 

.CHEC^    FOR  EMB   OF   ErtSIC    PCajTIME 

«41 

036D 

m5 

2H 

Lllfi 

lift 

■TOP  OF  VMSlfliLES 

t1642 

036F 

E5 

SC 

■itC 

I5C 

■  CUPPEMT   L'XFiTICWi 

i.04; 

«r371 

C3 

02 

CMP 

•«02 

.riiPFEPEMCE   =   2    IF   EMI 

OiMJ 

0373 

DO 

04 

I"  IE 

HOTEMIi 

RETUPH    IF   HOT   note 

0045 

0375 

M5 

21 

Liui 

Ut 

■  CHECP    HICH  MHiPESC-. 

0046 

0377 

a 

SD 

CMP 

I5D 

0047 

0379 

60 

rCTENIi 

RT-; 

e  REM  ROBERT  H  WOLLEIIIEPG 

10  REM  pRoc.RFiM  TO  mfpe/iI'  ijiinc.  iiisi.  CLiHCflTEfMTE  commw 
15  HEF  Fnfl(,;:)=pEE(,'.\'+25<;*P£ei  ■,;■>!  I  IiEf  fhei::  ^fna";.-;- 

20    I=FtjHi4Ci.i    E=FHH',42--    :>FHE'I> 

25  IF  i+;.:j=e-2  theh  priut-emii  of  MtKORV-iiCi  limi"  enh 
30  1=1+::  IF  Fmci  )i;;ci  then  ;i=FHEa:)  goto  25 

35  FOR   .1=1    TO   1*3  P0K£J.PEEKi,J+4:)  HE:>iT 

4u  F0R,r=]+4   TO   I<-7F0KEJ.32  HE;-:T:    V=I-1325+4     REM  0FF-=.ET 

45  ;':=FHE'  I  j+v  F'Oi.Ei+i  ,itiT',i  i+:::)/256:j  pokei,  im-z'^etniTi  ■  i*y.i. 
50  1=1+;-:  IF  FHft-:i  i-.";.o  atw  i  :E-i  then  45 

55  IF   FW'.  Ii=e  MlW   I  .'£-2  THEN   35 
60  PRHn"LIIIt:-C0(1FL£TE"    END 
ftEfdiV. 


recalculated  to  compensate  lor  the  relocation  of  code. 
Thi,s  is  done  conveniently  using  the  ROM  chaining 
routine  at  $C442. 

To  use  the  attached  machine  code,  (ir'st  use  the 
disk  Copy  command  to  concatenate  up  to  four  pro- 
gram pieces.  For  example,  to  append  pans  A,  B  and 
C  to  form  program  D,  the  following  command  is 
IS         executed  (after  loading  the  DOS  support): 
►C0:D  =  I:A,1:B,1:C 
Next  load  the  machine  code  and  the  concatenated 
program  D  into  memory  and  type: 
SYS826 

The  programs  are  linked  and  the  message: 
"READY."  appears. 

For  comparison,  I  have  wi^tten  a  basic  program 
to  link  concatenated  programs.  In  this  case  the  linking 
program  must  be  the  first  program  concatenated. 
Once  concatenated,  the  new  program  is  loaded  into 
memory  and  then  linked  by  tyjaing: 

RUN 
The  linking  program  is  then  deleted,  lea\ing  only  the 
desired  appended  program.  Comparison  of  these  two 
procedures  rcvealcfl  that  the  machine  language  code 
ran  nearly  a  thousand  times  lastci'  than  ilie  basic 
code.  © 
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6502 
MACRO  ASSEMBLER 

AND  TEXT  EDITOR 


Versions  for  PET,  APPLE  II,  SYM,  KIM 
and  ATAR  I  (1st  quarter  1980) 
Written  entirely  in  machine  language 
Occupies  8K  of  memory  starting  at  $2000  — 
Apple  version  with  disk  occupies  just  over 
9K 

Macro  and  conditional  assembly 
36  error  codes,  26  commands,  22  pseudo  ops 
Labels  up  to  10  characters 
Auto  line  numbering  and  renumber  com- 
mand 

String  search  and  string  search  and  replace 
Copy,  move,  delete,  load,  save,  and  append 
commands 

Cassette  and  Manual  $49.95 

(including  U.  S.  postage) 

Phone  [919]  74S-S44(5  or  924-2889 

Eastern  House  Software 


3239  Linda  Dr. 


WinBton-Salem,  N.  C.  27106 


FinaUy,  MAE  -  A  PET 
DISK-Based  MACRO 
ASSEMBLER/TEXT 
EDITOR 


Works  with  32K  PET 


—  Works  with  2040  Disk,  and  can  drive  2022/2023 
Printer,  and/or  RS232/20  ma  Device  thru  User  Port. 

—  100%  Disk  Based,  100%  Machine  Language. 

—  Macros,  Conditional  Assembly,  and  a  new  feature  we 
developed  called  Interactive  Assembly. 

—  Coexists  with  Basic,  Auto  character  repeat.  Sorted 
Symbol  Table. 

—  27  Commands,  26  Pseudo  Ops,  5  Conditional  Ops,  38 
Error  Codes. 

—  Creates  relocatable  object  code  on  disk. 

—  Assemble  from  Memory  or  Disk. 

—  String  search,  search  and  replace,  and  inter-iine  edit. 

—  Auto  line  #-ing,  move,  copy,  delete,  renumber. 

—  Labels  up  to  31  characters  —  user  specifies  length. 

—  Includes  extention  to  PET  monitor  (disassemble, 
trace,  etc.),  Library  of  PET  ROM  locations,  Relocat- 
ing Loader,  plus  more. 

Manual,  Diskette,  U.  S,  postage  -  $169.95 

(Requires  completion  of  License  Agreement  — 
Write  for  details) 

Eastern  House  Software 

3239  Linda  Drive  Winston-Salem,  N.  C.  27106 

Phone  (9191  748-8446  or  924-2889 


PUT  YOUR  PET 
ABOVE  THE  CROWD! 

Link  it  with  GPA  ELECTRONICS' 
Programmable,  Intelligent  I/O. 

Not  just  a 

telecommunications 

I/O.  Not  just  an 

intelligent  hard  copy 

interface.  GPA's 

Intelligent  I/O  is  a 

COMPLETE 

S  MICROCOMPUTER 

on  a  41/2  "x7"  card! 

Programmable  via  Resident  Monitor  in  PROM, 

the  Intelligent  I/O  puts  your  PET 

in  communication  with  the  real  world, 

or  with  other  computers,  large  or  small. 

FEATURES: 

•  6502  Microprocessor. 

•  2K  E-PROM;  IK  RAM  as  buffer. 

•  Fully  1EEE^88  compatible  and  addressable. 

•  Serial  and  parallel  I/O  through  four  ports.  Device  can 
communicate  with  two  peripherals  simultaneously; 
RS-232  devices  can  communicate  with  parallel 
devices. 

•  Hard  copy  interfacing  with  either  RS-232  or  20mA 
devices  (Please  specify.) 

•  Accommodates  all  baud  rates  to  9600. 

•  Selectable  line  feed,  carriage  return  delay  and  char- 
acters per  line. 

•  Supports  standard  EIA  modem-control  signals. 
■*■     Handshaking,  of  course. 

•  Functions  as  Data  Channel,  SPOOLER  or  Program- 
mable Filter. 

•  Remote  access  to  Basic. 

•  Fully  disk  compatible. 

■k  Will  provide  secure,  encrypted  telecommunications 
with  optional  programming. 

•  Complete  dial-up  and  time  sharing  functions. 

■*■  Allows  ganging  of  microcomputers  for  multi- 
processing. 

•  Accesses  and  controls  servos,  sensors,  articulated 
devices  or  transducers  (with  appropriate  firmware, 
available  from  GPA.) 

•  Functions  as  disk  controller,  resident  assembler, 
E-PROM  burner  (with  optional  firmware.) 

•  Integral  power  supply  (5VDC  @  350mA.)  Completely 
portable,  stand-alone  computer. 

•  Fully  documented,  tested  and  guaranteed. 

See  your  dealer  today,  or  order  direct  from  GPA. 
Just  $259.95  (llOVAC  )  or  $279.95  (250 VAC) 


P.O.  Box  «1 

t.a¥lon>ilte,C.\  95454 

•  P^T1  K  B  refrBltTMl  Irade  mari*  of  C  ommodorr  Business  Machinci. 
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Skyles  Electric  Works 


Presenting  the  Skyles  MacroTeA 

The  Software  Development  System 
For  the  Serious  Programmer 

Text  Editor  Fast... Fast  Assembler       Enhanced  Monitor 


To  help  vou  write  your  program,  MacroTeA  includes  a 
powerful  text  editor  with  34  command  functions: 

AUTO        IMumberi  iines  aiiVOmaiicallv. 
AutomaiTcallv  lenufTibeit  imes 
OuipuM  tent  file  ifi  eajv  to  read  columiM 


NUMBER 

FORMAT 

COPV 


MOVE 

DELETE 
CLEAR 
PRINT 

PUT 

GET 

DUPLICATE 


HARD 

ASSEMBLE 


Copi«  a  l^ne  ot  group  o'.  lines  to  a  n^A 
location 

MGuei  a  liiii>  at  ^roup  of  lines  10  a  nnw 
locaiion. 

Deletes  a  line  or  grouo  o(  lines. 

Clears  Ihe  lexl  \i\f^ 


PimlS  .1  fifie  or  <](t)iip  nl  Unv\  !□ 
the  PET  script-. 1 

Savei  a  lini!  or  qroup  oi  Unei  0I  1(*«1  on 

the  t^i^^  lor  disc) 

Loads  a  pieviouiilv  Sawfid  line  Or  group  ot  Imps 

of  lexl  from  ihne  lape  ten-  discK 

Cop^H  test  flic  mixlules  fro'Ti  oiie  tape 
recnrder  to  Ihe  oTher   Smps  00  specific 
modutes  to  st\a>f<i  cfiangei  belofe  it  is  oupii 
cated    TJ^lS  command  m^kes  an  unlnrniterl 
length  ptogram  Oexi  fili>|  praciical 

Prints  oul  lem  file  on  printer 

Assembles  texi  file  withi  or  wiif^aul  a  listing 
Assefnblv  m&v  l*e  specified  for  \he  ob[eci  code 
IpiOgj'am)  10  be  recorded  or  placed  in  RAM 


PASS       Does  seconrf  paw  of  aiiemblv  -  Anpi  her 

command  ihai  rrmkei  unlimited  lengT^  tent 
files  (souice  cDdv)  piaciical. 

RUN       Rur\4  (finecutes)  a  prevsously  assembled 
program.. 

SVMBOLS        Prints  out  Ihe  syn^bol  table  Uabel  file). 

SET        Gives  complete  control  of  tfie  size  and  location 
of  Ihe  tGRt  file  [source  file),  label  file  (svmbot 
labiel  and  r£loCiltable  buffer 
DISK        GiveJ  complete  access  to  the  eleven  DOS 
commands: 

PUT    GET     NEW    INITIALIZE 
DIRECTORY    COPY     DUPLICATE 
SCRATCH     VALIDATE     RENAME 
ERROR  REPORT 

EDIT       Offers  unl)elie»/ably  potfvsrful  searcfi  and  replaci? 


Briefly. 

•  BA 

•  CE 

•  LS 

•  LC 

•  CT 

•  OS 

•  DC 

•  MC 


SE 

DS 


SI 
DE 


EJ 
SET 


Ihe  pseudo-ops  are: 

Commands  thy  asSemfjJei  lo  begin  plsCing  assembled 
cade  where  ir>dicated 

Commands  tr>&  assembler  to  coniinue  assetnbly  unless 
cenain  serious  errors  occur.  AH  enors  aie  printed  our 

Commands  the  assembler  10  st^'1  Jisiing  source  (lOi 
f.lel  from  Ihil  pOinl  on 

Commands  Th^  assembler  to  Slop  list  source  (lem  fiieJ 
from  ttiii  pomi  in  ifie  program 

Comn^ands  the  assembler  to  continue  that  source 
Drogram  lie^ti  fiiel  on  tape 

Conimands  the  assembler  m  siore  ihe  obiecr  code  m 

rtH-morv 

Commands  ifie  asspmbier  to  not  store  obj&ct  code  in 

memory 

Commands  tPie  asiemblei  to  sioTe  obieci  code  at  toca 

Hon  different  from  if^e  locaiion  in  wfiich  n  is  assembling 

object  code 

Commands  the  assembler  lo  store  an  external  addieSs 

Commands  ttie  assembler  to  set  aside  a  block  oi  storage 

Commands  Ihg  assemb^isr  to  siOfe  data 

Commands  the  asiembier  to  store  an  miernal  address 

Commandj  the  assembler  to  calculale  an  exiemal  lafjei 
expression 

Commands  the  aispmbici  10  calculate  an  miefnal  label 
enpres^ton 

Infotnis  the  assemblrr  that  this  is  the  end  of  the 
proriram. 

Commands  the  assembler  to  eject  to  top  of  page  on 
prmter  copy. 

A  dif&ciive  n.oi  a  pseudo-op,  directs  tfie  assemblers  to 
redeMne  the  value  at  a  labe^ 


Macro  Assembler 

The  macro  pseudo-ops  include: 


MD  TfiiS  IS  3  macro  begrnni^ng  instruction  def "■tilum 

ME  Thii  IS  end  of  a  macro  instruction  definumn 

EC  Do  not  output  macro-generatsd  code  in  soirff 

listing. 

ES  Do  output  ma Cro-gene rated  code  in  source 

listing 


cap^bitily    Many  targe  computer  assembk-rs 
fack  this  sophist-cation. 


Conditional  Assembler 

Searches  text  tile  for  defined  Strings,  Optionally 

prints  them  and  coiirMs  them,  i.e.,  this  command    The  conditional  assembly  p$eudo  op^  are: 

counts  number  of  characters  in  veKi  file 


MANUSCRIPT 


Eliminares  Ime  numbers  an  PRtlMT  and  HARD 
command  Ma^es  MacroTea  a  true  and  pokivfir' 
fgl  Text  Editor 

Breaks  to  ific  Monitor  portion  of  MacroTea. 
A  return  to  Tcul  Ednor  rtithout  loss  o'  tent 
IS  possible 

Imorpves  Or  laitors  MacroTea's  Teift  Editor 
to  usef's  needs,    'DO'it-vourself"  comttiand 


lEQ  I'  the  label  expression  is  equal  to  ?ero, 

assemble  this  block  of  soufce  code  (text  file}. 
IIME  II  the  label  PKpression  is  not  equal  to  zero. 

assemble  this  block  ot  source  code  {text  file). 
jPL  ll  the  label  expressior^  is  positive,  assemble  ihis 

blocV  ot  source  Code 
IMI  If  the  label  enpreSSicn  is  n^Q^ilive.  assemble 

this  block  of  ioufce  code. 
■■•  This  IS  the  end  ol  3  block  of  source  code. 


A  Automatic  MaCroTtA  cold  start  fiam  Monitor. 

2  Automatic  MacroTeA  warm  itart  from  Monitof. 

F  Loads  from  tape  ohjer I  COtfC  [irogrnm, 

S  Saves  to  tape  object  code  bptwiecn  rocations 

specified. 

0  Disassembles  object  code  bocii  to  source  listing. 

M  Displays  in  memoiy  object  codir  starting  at  selected 

location.  The  normal  PET  screen  Hdil  may  be  used 

to  change  the  object  code. 
R  Displays  in  regi^sler.  Contents  may  t>e  changed  using 

PET  sCTeen  edit  capabilities 
H  Hunts  rnem-ory  (oi  a  particular  grovJp  pf  object 

cod«s 
W  Allows  you  to  walk  ihrou'jh  ihi-  (iiogram  one  step 

at  a  lime 
B  Breakpoint  to  occur  after  specitiecf  number  ot 

passes  past  specified  address. 
Q  Stan  on  specified  address.  Quit  it  STOP  key  or 

breakpoint  OCCuiS. 

T  Transfers  a  program  Or  part  ol  a  pio^fam  from  one 

memo'v  aiea  to  analhei. 
G  Go"  Buns  machine  languflige  program  starting  at 

selected  tocauon 
X  Exits  back  to  BASIC 

1  Display  memory  and  decoded  ASCH  characters, 
P  Pack  (fill  I  memory  with  specified  byte. 

What  are  the  other 
unique  features  of  the 
MacroTeA? 

•  Labels  up  to  10  characters  in  length 

•  50  different  syfTfi  bo's  to  choose  from  for  each  character 

•  10   '  different  labeix  possible 

•  Create  executable  object  code  m  rnciTiory  or 
store  on  tape 

•  Text  editor  may  be  used  for  composing  letters, 
manuscripts,   etc. 

•  Text  nnay  be  loaded  and  stored  fron^  tape  or  disc 

•  Powerful  two-cassette  duplicator  function 

•  String  search  capabitiiy 

•  Macros  may  be  nested  32  deep 

•  25  Assembler  psuedoops 

•  5  Conditional  assembler  psuedo-ops 

•  40  Error  codes  to  piripoini  problems 

•  16  Erfor  codes  related  to  Macros 

•  Warm-siart  button 

•  Enhanced  monitor  with  16  commands 


Truly,  there  is  simply  no  other  system  of  this  magnitude  at  anywhere  near 
this  price.  $395.00* 

{With  any  Skyles  Memory  Expansion  System, $375.00 

California  resiOenis    please  aaa  6--  or  6  5--.  sa'es  lat  sj  requ-'ec 
VISA,  MASTERCHARGE  ORDERS  CALL  (800)  538-3083  (except  California  residents) 
CALIFORNIA  ORDERS  PLEASE  CALL  (408)  257-9140 


Skyles  Electric  Works 


231  E  South  WhismaiA  Road 
Mountain  View,  CA  94041 
(415)  965-1735 ; 
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Mixing  Basic  and 
IVIachine  Language 


Jim  Butterfield,  Toronto 


It's  not  too  hard  to  put  Basic  and  Machine  Language 
together.  Care  is  needed,  of  course,  but  there's  no 
great  inystcry. 

One  of  the  easiest  tricks  is  to  put  the  machine 
language  program  behind  the  Basic  jirogram  in  mem- 
ory. Once  you've  created  and  saved  the  package, 
it  may  be  LOADed  and  SAVEed  without  special 
instructions.  There's  one  thing  you  need  to  watch, 
however:  when  the  packge  is  complete,  you  must  not 
change  the  Basic  program.  If  you  do,  the  machine 
language  part  will  be  moved  away  froin  its  original 
location.  Your  SYS  command  will  take  you  to  the 
wrong  place,  and  the  Machine  Language  program 
probably  won't  work  anyway. 
The  following  sample  programs  u.so  this  kind  of 
packaging.  Here's  how  to  set  them  up  on  your 
machine: 

1.  Type  in  the  Basic  program  completely.  Check 
it  carefully,  since  you  won't  have  the  option 
to  change  it  later. 

2.  Enter  the  machine  language  monitor.  If  you 
happen  to  have  an  early  PET  with  original 
ROM  (no  built-in  monitor),  you  should  have 
previously  loaded  one  of  the  "high-monitors" 
that  are  available.  (See  Roy  Bu.sdiecker's 
article :   '  'Relocate  PET  Monitor  A Imost 
Anywhere"). 

3.  Double  check  to  ensure  that  your  Basic  pro- 
gram hasn't  somehow  crept  up  above  the 
machine  language  area  that  you  plan  to  use. 
There  are  several  ways  to  do  this.  One  is  to 
inspect  the  Basic  memory  area  and  spot  the 
three  00  values  that  signal  the  end  of  the 
Basic  program.  Another  way  is  to  take  a  look 
at  the  start-of-variables  pointer  (hex  7C  and  7D 
on  original  ROMs;  hex  2A  and  2B  on  newer 
ROMs)  and  make  sure  it's  below  the  area  you 
are  about  to  work  in. 

4.  Now  type  in  the  machine  language  as  shown. 
Check  it  closely;  a  single  mistake  will  cause 
improper  operation. 

5.  Finally  -  still  in  the  Machine  Language 
Monitor  -  save  the  whole  thing  from  start-of- 

Basic  (hex  0400)  to  end-of-machine-language 
-plus  one.  On  the  Universal  Rom  Test  pro- 
gram, for  example,  you'd  save  from  0400  to 
084A. 
Now  your  program  is  ready.  It  can  be  loaded, 
saved  or  copied  without  any  special  knowhow.  Just 
remember  -  don't  change  the  Basic  part  of  the  pro- 
gram . 


Universal  ROM  test 

This  program  loads  into  any  machine  and  tells 
you  what  kind  of  ROM  you  have.  It  will  test  ROM 
ri'iK'atedly  until  you  sttjp  it...  this  makes  it  good  for 
spotting  intermittent  errors. 

All  of  the  standard  ROM  sets  I  know  about  are 
there.  There  are  also  a  couple  of  experimental 
Commodore  ROM  sets  included  -  I  had  a  chance  to 
take  a  look  at  them  during  a  recent  trade  show. 
These  may  change  by  the  time  Commodore  releases 
them,  so  don't  take  them  too  literally, 

100  PRINT"fi^i't  UNIVERSAL  ROM  TEST     JIM  i 

-.BUTTERFIELD" 
110  DATA  "011  ORIGINAL", 59487, 12796, 

-.51858,61980,58622,7753,6792,-1,-1 
120  DATA  "019  ORIGINAL", 59339, 12796, 

-.5185  8,61980,58622,7753,6792,-1,-1 
130  DATA  "UPGRADE  PERSONAL" , 41799 , 42993 , 

^64  95  9,8803,3  8129,43129,23093,-1,-1 
140  DATA  "UPGRADE  BUSINESS ", 41799 , 42993 , 

-.64959,8803,38129,43129,23093,-1,-1 
160  DATA  "DOS  PERSONAL  I  ",  40596 , 45201 , 

-.34900,0  8207,47820,00390,44555, 

^40847,44239 
170  DATA  "DOS  BUSINESS  I ", 40596 , 45201 , 

-.27250,08207,47820,00390,445  55, 

-.40847,44239 
180  DATA  "DOS  80-CHARS  I"  ,  40596 ,45201 , 

-.21130,0  8207,4782  0,00390,44555, 

-.40847, 44239 
190  DATA  "*" 
200  DATA  192,208,224,240,200,216,248, 

-.176,184 
210  DIMA$(8) ,V(8,9),A(9),R{9),H(9) 
220  READX$:IFX$="*"GOTO290 
230  R=R+1:A${R)==X$ 

240  F0RJ=1T09:READV(R,J) : NEXTJ :GOTO220 
290  F0RJ=1 T09 : READA ( J ) : NEXTJ 
300  FORJ=1TO9:POKE1023,A{J) :SYS2112 
310  R(J)=PEEK(1021)-t-PEEK{1022)*256 
320  NEXTJ:P=7 
330  FORJ=1TOR:M(J)=0:FORK=1TOP:IFR(K)=V( 

•nJ,K)THENM(J)=M(J)-l-l 
340  NEXTK,J 
350  L=-1:P0RJ=1T0P:IFM(J) >LTHENL=M ( J) : 

-iK=J 
360  NEXTJ: IFP=7ANDV(K, 8) >=0THENP=9: 

-.GOTO330 
370  N=N+1 : PRINT"hTEST " ; N : PRINT "ittt " ; 

-.A$(K)  :PRINT 
380  F0RJ=1T0P 

390  1FR{J)=V(K,J)THENPRINT:GOTO410 
400  A=A(J) :B%=A/16:C=A-B%*16:PRINTCHR$(B 

-.%-l-55)  ;CHR$(C-i-4  8) 
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410  NEXTJ: PRINT 

420  PRINT"BAD  ROMS : " ; P-L ; "« 


":GOTO300 


0840  AD  FF  03  85  B2  A9  08  85 

0848  B5  A9  00  85  Bl  85  B3  A0 

0850  00  18  71  Bl  90  02  E6  B3 

0858  C8  D0  F6  E6  B2  C6  B5  D0 

0860  F0  8D  FD  03  A5  B3  8D  FE 

0868  03  60  00  00  FF  00  00  FF 

RAM  test 

This  is  a  very  fast  memory  test,  yet  it's  quite 
thorough.  It's  adapted  from  the  memory  lest  in  The 
First  Book  of  KIM  -  you  can  dig  out  more  details 
there  if  you're  curious. 

The  coding  is  a  little  crowded;  I  wanted  to  fit 
the  whole  thing  into  256  bytes  so  that  the  rest  of 
memory  would  be  available  for  testing. 

The  program  tests  memory  repeatedly  until 
stopped.  Users  with  a  full  32K  of  memory  can 
input  a  value  of  33  and  test  screen  memory  too. 
That  way,  they  can  see  the  actual  test  on  the  screen 
as  it  happens. 

10  INPUT"H^tHOW  MANY  K";K:K=K*4-1 

20  POKE185,K:POKE184,5 

30  N=N+l:SYSll56:PRINT"liTEST  ";N; 

40  J=PEEK(187) :IFJ>KGOTO30 

50  PRINT"FAILED  AT" ; J*256+PEEK ( 186 ) 


.:   0484 

A9 

00 

A8 

85 

BA 

85 

BC 

A2 

. :   048C 

02 

86 

BD 

A5 

B8 

85 

BB 

A6 

. :   0494 

B9 

A5 

BC 

49 

FF 

85 

BE 

91 

. :   049C 

BA 

C8 

D0 

FB 

E6 

BB 

E4 

BB 

. :   04A4 

00 

F5 

A6 

BD 

AS 

B8 

85 

BB 

. :   0  4 AC 

A5 

BC 

CA 

10 

04 

A2 

02 

91 

. :   04B4 

BA 

C8 

D0 

F6 

E6 

BB 

A5 

B9 

. :   04BC 

C5 

BB 

B0 

EC 

A5 

B8 

85 

BB 

. :   04C4 

A6 

BD 

A5 

BE 

CA 

10 

04 

A2 

. :   04CC 

02 

A5 

BC 

Dl 

BA 

D0 

15 

C8 

. ;   04D4 

D0 

F0 

E6 

BB 

A5 

B9 

C5 

BB 

. :   04DC 

BO 

E8 

C6 

BD 

10 

AD 

A5 

BC 

. :   04E4 

49 

FF 

30 

Al 

84 

BA 

60 

32 

Tape  Test 

The  version  given  is  for  Upgrade  ROM  only.  This 
lets  you  watch  any  PET  tape  and  sec  the  kind  of 
signals  that  are  coming  in  from  it. 

I  had  hoped  that  this  program  would  solve  head 
alignment  problems  once  and  for  all.  It  doesn't 
quite  make  the  grade,  since  in  my  opinion  it's  not 
sufficiently  sensitive  to  slight  alignment  changes. 
Even  so,  you  will  find  the  program  instructive. 

100  PRINT"fiTAPE  TEST  #  JIM  BUTTERPIELD" 

110  POKE59468,12 

120    PRINT:X$="LEADER":GOSUB500 

130    X$="DATA":GOSUB500 

140  X  $= " ERROR " : G0SUB5  0  0 

150  INPUT"TAPE  UNIT";T 

160  IFT>2ORT<1GOTO150 

170  POKE212,T 

180  SYS(1280) :END 

5  00  PRINT"  UCCI" 


510  PRINT" 

B. 

H 

-   11 

;X$ 

520  PRINT" 

JFFK" 

530  RETURN 

READY. 

.:   0500 

20 

12 

F8 

78 

A6 

D4 

CA 

F0 

.:   0508 

15 

CE 

13 

E8 

A9 

90 

8D 

4E 

.:   0510 

E8 

AD 

40 

E8 

8E 

FA 

00 

29 

.:   0518 

EF 

80 

40 

E8 

10 

0B 

EE 

11 

.:   0520 

E8 

A9 

34 

8D 

13 

E8 

80 

F9 

.:   0528 

00 

A9 

6E 

8D 

90 

00 

A9 

05 

.  :   0530 

80 

91 

00 

58 

20 

F0 

F8 

2C 

.:   0538 

13 

E8 

10 

F8 

A2 

02 

A0 

00 

.:   0540 

A9 

20 

95 

B8 

B5 

Bl 

F0 

06 

.:   0548 

94 

Bl 

A9 

A0 

95 

B8 

CA 

10 

.:   0550 

EF 

A5 

B8 

80 

7A 

80 

A5 

B9 

.:   0558 

8D 

F2 

80 

AO 

6A 

81 

06 

BA 

.:   0560 

69 

00 

29 

IF 

80 

6A 

81 

20 

.:   0568 

29 

F7 

10 

C7 

30 

C5 

20 

7A 

.:   0570 

05 

2C 

40 

E8 

2C 

10 

E8 

4C 

.  :   0578 

E4 

E6 

AE 

49 

E8 

AD 

48 

E8 

.:   0580 

EC 

49 

E8 

00 

F5 

A0 

FF 

8C 

.:   0588 

48 

E8 

8C 

49 

E8 

E0 

FC 

90 

.:   0590 

08 

E0 

FF 

D0 

07 

C9 

50 

90 

.:   0598 

0B 

E6 

B3 

60 

E0 

PE 

D0 

10 

. :   05A0 

C9 

60 

90 

0C 

A5 

CC 

29 

FC 

. :   05A8 

F0 

03 

E6 

Bl 

60 

E6 

CC 

60 

. :   05B0 

A9 

00 

85 

CC 

E6 

B2 

60 

00 

Leader  Write 

This  is  for  Upgrade  ROM  only.  It  writes  con- 
tinuous "leader"  (sometimes  called  "shorts")  to  tape. 
It's  useful,  in  conjunction  with  Tape  Test,  in  checking 
out  various  brands  of  tape  for  data  quality. 

100  PRINT"fit   X.  VJRITE  LEADER  TAPE  " 
110  PRINT"\f  #    JIM  BUTTERFIELD" 
120  PRINT"t  THIS  PROGRAM  WRITES  A  -i 

-iCASSETTE  TAPE" 
130  PRINT "WITH  'LEADER'  SIGNAL." 
140  PRINT"t^  the  CASSETTE  TAPE  SO  PRODUCED 

-.MAYBE  " 
150  PR1NT"USED  with  'TAPE  TEST'  TO  EITHER: 

— I 

160  PRINT"   —CERTIFY  THE  TAPE  AS  OK;" 
170  PRINT"   — ALIGN  TAPE  HEADS  OF  THE  -. 

-.OTHER  CASSETTE" 
180  PRINT"      UNITS.  IN  THIS  CASE, 

-.  BE  SURE" 
190  PRINT"      THAT  YOU  ARE  V7RITING  ON  A" 
200  PRINT"      PRECISELY  ALIGNED  TAPE  -. 

-.UNIT.^" 
210  SYS1472:END 
READY. 


05C0  A9  01  85  D4  20  47  F8  A9 

05C8  70  8D  C3  00  78  A9  A0  80 

05D0  4E  E8  A2  08  20  9B  FC  A9 

05D8  02  85  OE  A9  34  8D  13  E8 

05E0  8D  F9  00  8D  49  E8  58  A9 

05E8  70  8D  C3  00  20  35  F8  F0 

05F0  F6  20  7B  FC  4C  84  F2  AA 
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The  Basic  Switch 


Attention  "Old"  Pef  Owners: 

Not  sure  about  the  ROM  Retrofit  Kit 
from  Commodore? 

Now  you  can  use  both  sets  of  Commo- 
dore ROMs  and  others  as  weli, 
The  Basic  Switch  allows  switch  selec- 
tion of  either  ROM  set  (your  original  set 
or  your  retrofit  set)  from  Commodore. 
Pius,  Model  15-A  includes  on  additional 
zero  insertion  force  socl<et  allowing  easy 
use  of  ROMs  like  the  BASIC  Programmer's 
Toolkit...  concurrently, 
Model  15-A  The  Basic  Switch  plus ... 
includes  expanded  cable 
assembly  and  zero  insertion 
force  socket.  Your  15th  ROM 
simply  plugs  in  ,„  enabled 
while  either  ROM  set  is  selec- 
ted, Socket  15  may  be  re- 
addressed  by  the  user  for 
additional  flexibility. 
The  Basic  Switch  is  sold  in  assembled 
form  only.  All  models  are  designed  for 
easy  attachment  to  your  Pet  with  a  con- 
venient cable  assembly.  No  soldering  or 
drilling  is  required.  The  Basic  Switch 
mates  with  a  coble  assembly  at  your 
primary  board,  and  does  not  use  the 
physical  connectors  of  any  Pet  ports. 
Model  15-A  allows  you  to  use  the  BASIC 
Programmer's  Toolkit  without  the  need 
for  the  additional  S25.00  board  or  tying 
up  your  ports.  And  since  we've  designed 
the  15th  socket  to  be  readdressobie,  to 
take  advantage  of  available  ROM  soft- 
ware. 

Price  Schedule:  Effective  June  1 1980 

Model 
15-A-24 
15-A-28 
$129,95 


The  Basic  Switch: 

With  Installed  ROM 

Retrofit  Kit  from 
Commodore: 

With  BASIC 
Programmer's  Toolkit* 


$214.95 
$179,95 


Model  15-A-24  or  28  with  installed  ROM 
Retrofit  and  Basic  Programmer's 
Toolkit:  $259.95 

Model  15-A-24  or  28  with  installed  ROM 
Retrofit  and  both  BASIC  Programmer's 
Toolkits:  $304.95 

1.  "Old  Pets  were  shipped  with  24  or  28 
pin  ROMs,  You  must  check  which  you 
have,  and  specify  at  time  of  order. 

2.  'The  BASIC  Programmer's  Toolkit  is 
available  in  versions  for  "Old"  Pets 
and  retrofitted  Pets,  Order  both  from 
us  with  The  Basic  Switch  and  save 
the  $25,00  Board  cost  plus  on  addi- 
tional $10,00.  At  the  "package" 
price,  you  end  up  with  both  versions 
of  the  BASIC  Programmer's  Toolkit  for 
$90,00. 

3.  The  Basic  Switch  line  carries  a 
repair/replacement  warranty,  F.OB, 
South  Bend,  IN.  This  warranty  does  not 
cover  any  ROMs,  but  does  cover  all 
materials  and  workmanship  in  The 
Basic  Switch  and  harness  assembly. 

4.  Ordering  Information:  We  do  not  ship 
C.O.D,  Please  include  payment  with 
order,  or  wait  for  your  local  dealer 
to  carry  The  Basic  Switch  line.  Visa/ 
Master  Charge  accepted.  For  mail 
order  enclose  address,  name,account 
number,  and  expiration  date.  Dealer 
inquiries  invited, 

marketed  by: 

COMPUTER  CENTER  OF  SOUTH  BEND 

51591  U.S.  31  North 

South  Bend,  Indiana  46637 

(219)  277-4655 


indiona  residenrs  add  4%  sofes  tax.  All  orders  add  S2  50  shipping, 
Woining.  Removal  and  insertion  ol  ROMs  is  o  precise  losk  We  encourage  users  1o 
saek  professional  assistarice  for  inslarlation  We  assunn©  r*o  responsi- 
bility for  damage  caused  during  Insertion  or  removoL 

Pet^^is  a  trademark  of  COmmodore  Business  Machines, 
nc,  of  Santa  Clara,  Calif.  Ttie  BASIC  Programmer's  Toolkit 
IS  0  product  of  Palo  Alto  iC's,  A  Division  of  Nestar  Systems, 
Inc.  Delivery  times  may  vary  subject  to  availability  of  various 
ROMs,  etc.  Prices  and  specifications  subject  to  ctiange  wifti- 
out  notice. 
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After  the 
Monitor's 

IVlOVOCi         Roy  Busdiecker 

In  a  previous  article  ("Relocate  PET  Monitor  Almost 
Anywhere",  May/June  1980)  we  described  a  method 
for  placing  copies  of  Commodore's  tape  version  of 
the  PET  Monitor  in  different  locations,  and  how  to 
make  the  changes  that  would  enable  them  to  work  in 
the  new  locations.  This  article  is  a  continuation 
which  provides  more  information,  some  of  which  is 
essential. 

If  you  have  a  copy  of  the  PET  operating  manual 
which  includes  a  listing  of  the  Monitor,  it  might  be 
helpful  if  you  have  it  handy  while  reading  this. 

Although  each  of  the  newly  relocated  versions  of 
the  Monitor  worked  precisely  as  expected,  we  got  some 
unexpected  results  when  we  loaded  both  the  Monitor 
and  a  BASIC  program  into  memory  at  the  same  time 
and  used  the  commands  (SYS  in  BASIC,  X  in 
Monitor)  to  switch  control  back  and  forth.  What 
seemed  to  happen  was  that  every  time  we  tried  to 
RUN  a  BASIC  program  after  we  had  used  the 
Monitor,  we  would  get  an  OUT  OF  MEMORY 
ERROR,  even  though  we  knew  there  was  plenty  of 
memory  available. 

The  PET  keeps  track  of  memory  by  storing 
"pointer"  values  in  an  area  where  your  BASIC 
programs  won't  mess  them  up.  Their  locations  and 
use  are  summarized  in  the  following  table. 

LOCATION 
DECIMAL      HEX     POINTS  TO 

122,123         7A,7B    Location  in  memory 

where  BASIC  program 
begins. 

124,125        7C,7D    Beginning  of  area  where 
simple  (single-value) 
variables  are  stored. 

126,127        7E,7F    Beginning  of  ARRAY 
storage  area. 

128,129         80,81     Beginning  of  unused 
(FREE)  memory. 

130,131         82,83     End  of  string  (charac- 
ter) storage. 

132,133         84,85     Beginning  of  string 

storage  (note:  strings  are 
"backwards",  beginning 
at  the  highest  numbered 
locations  and  moving 
down  toward  the 
lowest!). 

134,135         86,87     End  of  available  mem- 
ory, plus  one  (i.e., 
points  to  first  location 


number  for  which 
memory  is  not  attached). 

Each  pointer  may  be  decoded  by  adding  the  value  in  its 
low-numbered  byte  to  256  times  the  value  in  its 
high-numbered  byte.  For  example,  an  8k  PET 
usually  contains  a  zero  in  location  134  and  a  32  in 
location  135,  so  the  cnd-of-mcmory  pointer  points 
to  location  0  +  (256  x  32)   =  8192.  You  can 
prove  this  by  typing 

PRINT  PEEK(134)  +256*PEEK(135) 

then  pressing  'RETURN'. 

The  problem,  we  discovered,  was  that  every  time 
we  did  a  SYS  23567  (we  were  using  a  23k  Monitor  ... 
the  7k  version  would  have  been  SYS  7183),  the 
"single-variable  pointer"  (Locations  7C,7D)  would 
be  set  to  a  value  greater  than  the  cnd-of-memory 
pointer.  Following  the  directions  in  the  previous 
article  had  required  changing  the  end-of-memory 
pointer,  but  they  had  also  told  us  to  do  a  NEW, 
which  set  the  "single-variable  pointer"  down 
to  the  same  value  as  "start  of  BASIC". 

It  took  a  little  detective  work,  but  we  found  the 
answer.  In  locations  (hex)  1C19  through  1C20  of 
the  7k  version  (shown  in  Figure  1),  there  was  a 
section  of  machine-language  code  which  reset  the 
"single-variable  pointer"! 

Figure  1 


7 1 33 
7195 
7197 
7199 


1C19  flylF 
ICIB  85711 
ICiD  fl96E 
iClF   857C 


LDH  #1F 

STH  7D 

Llifl  #fc"E 

>:TH  7C 


After  those  instructions  were  run,  locations  7C  and 
7D  (or  124  and  125  in  decimal)  would  hold  the 
values  6B  and  IF  (decimal  107  and  31).  Our  pointer- 
evaluation  rule  tells  us  it  would  then  point  to  loca- 
tion 8043  (107   +  31  *  256). 

Why?  Well,  since  the  original  Monitor  (before 
relocation)  went  into  the  area  where  BASIC  pro- 
grams were  usually  stored,  a  command  like  FOR  I 
'=    1  to  3; PRINT  "*":NEXT  I  would  clobber  the 
Monitor  unless  the  "simple- variable  pointer"  (to  the 
area  where  the  value  of  "I"  would  be  stored) 
pointed  past  the  end  of  the  Monitor. 

That  made  sense  when  the  Monitor  was  in  the 
original  location.  For  a  relocated  Monitor,  it  no 
longer  makes  sense. 

There  are  several  ways  to  deal  with  the  problem. 
First  (and  quickest),  we  could  simply  use  the  Monitor 
to  set  the  values  of  7C  and  7D  back  where  they 
belong,  each  time  we  use  the  Monitor.  That  gets  old 
fast,  and  we're  bound  to  forget  to  do  it  once  in 
a  while  (don't  ask  why  I'm  so  sure!). 

Second  (and  better),  we  could  use  the  Monitor 
to  change  the  offending  code,  locations  XX 19  to 
XX20  (in  the  7k  version,  substitute  IC  for  XX  .  .  . 
other  versions  correspondingly),  to  EA  (decimal  234) 


July/August.  1980,  Issue  5 


COMPUTE. 


93 


which  is  a  "no  operation"  or  "micro-delay" 
command.  Then  save  a  copy  of  the  modified  version, 
and  you're  home  free.  No  more  OUT  OF  MEMORY 
error's  if  you  follow  the  procedures  in  the 
previous  article. 

Third  (best?),  we  can  use  that  section  of  the 
Monitor  to  change  the  cnd-of-memory  pointer  in- 
stead of  the  "simple-variable  pointer".  Then  we 
can  omit  the  POKE  135, YY  step  described  in  the 
previous  article  to  protect  the  relocated  Monitor. 
Figure  2  shows  the  set  of  instructions  to  do  that, 
while  Figure  3  show  the  memory  locations  to  be 
changed,  and  the  values  to  insert,  using  the  Monitor. 
The  figures  use  values  for  the  7k  Monitor,  but  other 
versions  only  require  changing  the  value  in  location 
1C20  from  IC  to  2C  for  Ilk,  3C  for  15k,  and  so  on. 


■  1 33 
'195 
'  1 97 
'  1 39 


1C19  fl9iC 
iClE  8587 
ICIIJ  f\9m 
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0      1      2 

3      4      =:     b      7 

ICIS   021  fi9    IC 

35   87   fiy  00   S5I 

1C28   86  Ifly  43 

35   21    110    12  h9 

That's  the  end  of  the  essential  information. 
The  rest  is  fun. 

If  you've  read  this  far,  then  you've  probably  done 
some  machine-language  programming  on  the  PET. 
Like  most  of  the  rest  of  us,  you  used  a  SYS  command 
to  transfer  control  to  your  routine  (did  you  lose 
control?),  and  probably  ended  your  machine  language 
code  with  an  RTS  (return  from  subroutine)  command. 
So  far,  so  goo!  The  RTS  would  return  you  to  control 
of  BASIC,  since  the  SYS  command  caused  the  PET 
to  receive  a  JSR  (juinp  to  subroutine)  machine 
instruction  when  it  gave  control  to  your  routine. 

With  the  Monitor  in  place,  you  might  assume 
that  the  "G"  command  would  operate  in  the  same 
fashion  as  the  SYS  did  in  BASIC,  since  the  two 
descriptions  are  so  similar.  Unfortunately,  from  my 
point  of  view,  they  are  not  the  same.  That  RTS 
at  the  end  of  your  inachine-language  routine  will 
not  bring  you  back  to  the  Monitor,  or  to  BASIC, 
or  to  anywhere  else  that  is  particularly  useful. 
Not  a  very  satisfactory  ai-rangcment! 

After  more  searching  than  I  would  have  liked, 
I  did  find  a  way  to  change  the  Monitor  so  that 
'G'  acted  more  like  SYS  (most  of  the  time). 

In  the  7k  version,  the  G  command  sends  con- 
trol to  location  IDEB  in  the  Monitor  (shown  at 
05EB  in  your  Commodore  manual).  After  a  series 
of  LOAD  and  PUSH  instructions,  you  suddenly 
encounter  an  RTI  (return  from  interrupt)! 


That  seemed  like  a  far  cry  from  a  JSR,  but  it 
became  apparent  that  we  could  make  the  routine 
act  like  a  JSR  if  we  located  a  sensible 
return  address  in  the  Monitor,  then  pushed  that 
address  on  the  stack  before  the  PHA's  (push 
accumulator  onto  stack)  that  set  up  the  RTI  to 
execute  the  'G*.  To  add  instructions  meant  making 
more  room  so  we  "slid"  the  existing  code  down, 
moved  the  excess  to  the  end  of  the  Monitor,  and 
used  a  JMP  (jump,  or  transfer  control  unconditionally) 
to  tie  the  two  pieces  together. 

The  modified  machine  and  assembly-language 
instructions  are  shown  in  Figure  4,  as  they  should 
be  for  the  7k  version.  The  only  changes  for  ver- 
sions at  other  locations  are  the  contents  of  IDFO, 
1DF2,  and  I  DEC.  They  should  be  obvious. 

Figure  4. 
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If  you  use  the  Monitor  to  modify  itself.  Figure 
5  shows  the  way  the  pertinent  memory  locations 
should  look  after  the  changes  are  made. 

Figure  5 

0      12      3      4      5      6 7 


1DE8 

20 

B2 

IC  R6 

IF 

9fl 

J  20 
43 

F2 
R5 

1DF0 

IC 
IR 

H9 

48 

IC   43 
4C   6B 

R9 
IF 

42 
EH 

1DF3 

R6 
6 

IF 

0 

20 

1 
20 

.-,            .-, 

4 

5 

1 F68 

E7!R5 

19 
IE 

43 
R4 

h5 
IE 

IE 
40 

1F70 

48 

fl5 

IC   R6 

I've  been  using  the  23k  version  of  the  Monitor  for 
some  time  now,  and  am  quite  pleased  with  it.  The 
space  between  the  end  of  the  Monitor  and  the  end 
of  memory  is  enough  to  do  something  useful  with, 
too.  Mine  has  a  relocated  version  ol  an  "automatic 
repeating  keys"  routine  originally  published  else- 
where for  use  in  the  second  cassette  buffer!  t 
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Fitting  Machine  Language  into  the  PET 


Jim  Butterfield 


A  PET  machine  language  program  must  co-exist 
with  Basic.  You  need  at  least  one  Basic  instruction, 
even  if  it's  only  a  SYS  command  to  start  the  machine 
language  running.  You  could  give  the  SYS  as  a  direct 
command  from  the  keyboard;  but  it's  usually  much 
better  to  put  it  in  as  a  program  line  and  let  the 
user  type  RUN. 

The  Basic  program  is  usually  in  a  predictable 
place.  It  will  start  at  address  1025  (hexadecimal 
0401),  and  will  occupy  memory  space  upward  from 
there.  The  end  of  the  Basic  program  can  be  spotted 
by  the  fact  that  memory  will  contain  three  consecu- 
tive zeros. 

Your  machine  language  program  can  go  almost 
anywhere  that's  free.  There  arc  three  favorite  places 
for  such  programs: 

--in  the  cassette  buffer(s); 

--immediately  above  the  end  of  Basic; 

--at  the  top  of  memory. 
Each  has  its  advantages  and  drawbacks.  Let's  deal 
with  them  one  at  a  time. 

Cassette  Buffer(s) 

If  you  use  only  cassette  niunber  I,  the  second 
cassette  buffer  is  free  and  available  for  your  use.  Its 
address  is  hex  033A  to  03F9,  which  gives  you  192 
locations  to  play  with.  If  you  don't  use  cassette 
tape  at  all,  i.e.,  you  use  disk,  you  may  use  both 
buffers;  this  gives  you  addresses  from  027A  to  03F9 
hex.  or  384  locations. 

The  newest  models  of  PET/CBMs  use  a  small 
portion  of  the  second  cassette  buffer.  If  you  have  4.0 
ROMs  -  that  is,  your  machine  accepts  English- 
language  commands  like  SCRATCH  or  CATALOG  - 
you'll  need  to  leave  the  bottom  twenty  locations 
or  so  free.  And  if  your  machine  has  a  TAB  key, 
you  must  leave  a  few  locations  at  the  top  -  or 
your  tab  stops  will  change  mysteriously.  On  these 
newer  models,  work  in  the  range  of  0350  to  03ED  and 
you'll  be  reasonably  safe. 

The  cassette  buffer  area  is  ideal  for  machine 
language  programs.  Except  as  noted  above,  it  is  com- 
pletely unused  for  any  basic  activity.  Loading  new 
Basic  programs  won't  affect  it.  You  may  easily 
save  machine  language  and  Basic  together  by  using 
the  Machine  Language  Monitor's  .S  (Save)  command 
and  specifying  the  address  range,  from  start-of- 
machinc-language  to  end-of- Basic.  The  whole  thing 
will  be  saved;  and  later,  a  LOAD  from  Basic  will 
load  everything  back,  both  machine  language  and 

Basic. 

There  are  two  problems.  First,  the  amount  of 

space  is  limited.  You'll  find  plenty  of  room  for 
your  first  small  programs;  but  as  yoti  get  more 
experienced  and  more  ambitious  your  programs  will 
become  too  big  to  fit  in  this  space. 

The  second  problem  may  not  be  a  problem  at 
all,  depending  on  your  objectives.  Programs  which 
have  been  written  and  saved  using  the  above 


techniques  can't  be  copied  easily.  The  nai\e  user 
who  performs  LOAD  and  then  SAVE  will  load  the 
whole  program  -  but  will  save  only  the  Basic  part. 
To  copy  the  program,  you  need  to  go  to  the 
Machine  Language  Monitor  -  and  then  you  need  to 
know  the  addresses  to  give  for  the  .S  (Save) 
command.  If  you  prefer  to  keep  your  programs  pri- 
vate, this  can  be  a  useful  technique.  But  if  you'd 
rather  sec  them  passed  around,  this  can  be  a  problem  - 
you  might  get  tired  of  being  the  only  person  that 
can  make  copies  for  other  people. 

Above  the  end  of  Basic 

This  isn't  hard  to  do,  once  you  get  the  hang 

of  adjusting  the  start-of-variables  pointer  (located 

at  2A  and  2B  hex  in  upgrade  ROM,  of  at  7C 

and  7D  in  original  ROM).  After  your  Basic  program 

is  written,  this  pointer  will  direct  you  to  the 

available  memory  immediately  after  that  program.  Put 

your  machine  language  program  there,  and  then 

change  the  pointer  so  that  it  indicates  a  location 

above  both  programs  -  both  Basic  and  machine 

language.  Give  the  Basic  CLR  command  alter  you  do 

this,  and  all  the  other  pointers  will  line  up  correctly. 

Now  you  can  use  a  Basic  SAVE  to  record  your 
program.  Both  Basic  and  Machine  Language  will  be 
saved,  and  they  will  both  load  together  at  a  later 
time. 

Using  this  system,  you'll  have  lots  of  space  for 
your  machine  language  program  if  you  need  it.  The 
composite  program  can  be  copied  easily:  just  do  a 
conventional  LOAD  and  SAVE  any  time  you  want  an 
extra  copy. 

There's  one  drawback  to  using  this  system.  Once 
you  have  set  it  up,  it  is  difficult  to  make  a  change 
to  the  Basic  program.  If  you  add  or  delete  anything  - 
even  a  single  character  -  your  machine  language  pro- 
gram will  move  to  a  new  location.  You'll  need  to 
change  your  SYS  command  or  USR  vector.  Worse, 
most  machine  language  programs  can't  be  moved 
without  needing  changes.  You  will  have  to  rewrite 
the  program  so  that  it  will  work  properly  in  its 
new  location. 

This  is  one  of  the  most  convenient  ways  to 
]>osition  machine  language.  Keep  in  mind,  however, 
that  it  reduces  your  freedom  to  change  the  Basic 
program . 

At  the  top  of  memory 

This  is  a  very  convenient  place  lo  put  relatively 
permanent  machine  language  programs.  It  goes  in 
the  high  end  of  memory.  Since  string  variables  are 
written  in  high  memory,  you  must  protect  this  type 
of  program  by  moving  the  limit-of-Basic-mcmory 
pointer  down  so  ihat  it  points  below  your  program. 
(This  pointer  is  located  at  hexadecimal  34  and  35  in 
upgrade  ROM,  or  hex  86  and  87  in  original  ROM). 
Once  you  have  done  so,  the  program  will  take  up 
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pt-rmancm  residence  and  will  usually  ri-maiii  in  your 
inaciiine  until  you  turn  the  power  off. 

In  this  case,  the  Basic  and  maciiine  language 
programs  are  no  longer  adjacent  in  memory.  You 
can't  SAVE  and  LOAD  them  together.  Be  sure  (o 
LOAD  the  machine  language  program  first,  followed 
by  the  Basic  program;  otherwise  some  of  the  Basic 
pointers  will  be  mixed  up,  and  you'll  probably 
get  an  POUT  OF  MEMORY  error.  Remember,  too, 
that  the  machine  language  program  will  take  up 
permanent  residence.  It  won't  go  away  when  you 
load  a  new  Basic  program. 

Another  problem  that  you'll  have  to  face  with 
this  technique  is  that  different  machines  are  fitted 
with  different  amounts  of  memory.  A  machine 
language  program  that  sits  neatly  ai  the  top  of  an 
8K  machine  will  lie  smack  in  the  middle  of  memory 
on  a  16K  unit.  You  would  need  different  versions 
for  different  sizes  of  machine.  Keep  in  mind,  once 
again,  that  you  usually  can't  move  a  machine 
language  program  to  a  new  location  without  making 
changes  to  it. 

It  is  possible  to  write  a  program  which  finds 
the  top  of  memory,  parks  the  machine  language  pro- 
gram up  (here  (wherever  it  happens  to  be),  makes 
all  necessary  corrections,  and  ihen  moves  (he  limil- 
of  Basic-memory  pointer  to  the  proper  place.  Many 
programs,  such  as  Superrnon  and  the  DOS 
"wedge"  system,  do  exactly  that.  It's  an 
advanced  techiiicjue,  however  -  don't  try  youi' 
hand  at  it  imiil  you  feel  you're  ready.  © 
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Billboard 

■i  irtrt  ^.^uarv*    di«p],a^    (■&#4t") 

«19.9S 

Bk 

Saflool    kit     [ 

Add    UTlliim    16   ^Our    ^ra«r«^ 

*19.95 

6k 

M*n-£)(cUr»r 

Sir    how  lour    rro*ran    i*  *t  or»d 

i   9.9S 

16k 

U*r-{»iclvXr»f 

U«riibl«  dicTioriap^.    ci->Ht-r«F 

*19.95 

Bk 

m 

S*Jt*-Plf« 

Crm*    fantrni,     trtl    reaction* 

*   5.9S 

For  rmr*^%  tstrktd  unk  *.  rltMtt  %rtcift  U«r«ion  1  CBatic  2,0>  or 
Ufr^Lon  2  <&»ic  3.0)  Ran«.  Um*  fat-  avtilabil  i  In  ef  ^rrirfcit  far 
U»rnon   5    (B**lC    4.0)    ftW-t    and    BO    ^oluAn      dis^lr-*.  BSS      Dilk      fr^trart 

aiJlllaAI*   tacn.       Plor»   ar*    en    1ht   ua^    i    writ*    for    lattit    li-tl. 


ftCCESSOPV   IHTEPFflCE  OEJICES 

fl]l  iflfirtaet*  *r*  «if^lrt.  t«trt,  ind  waranitKJ.  Ho 
IQfiuarr  i\  rr^uirtd.  iin*l>i  ^lu«  ;n  atvj  us«.  Ktfii  ta^K^itd 
CUtIon*r*    iinoy    t  kat     our    lw*r    fric**    ntan    b*tt#r    -^jialii:^' 

TU-£5C  Inr#rf*cf  P£T-'C8n   Xo  Ctriirortic*^      hEC-      X'tntc,      or      oihtr 

inGkjttr^  itandai-d  r-Arallil  printm.  Sinrlv  pIup  in  tg 
conputtr  and  printer  ...  no  toftufT't  r»^uir«d.  Uorlci  uH^ 
disk.    ath#r    !£££   dtv\ct%   tttachK]!      (129.95 

TLF-t514         Inl.rUc*   P^1''Q&H    to   RS-232    <i»riaj>      »rint#r«,  *uch     at 

lh»    ropular    Htaihkit    H-14.       1200  baqd    Coihtr    ratfi  Whiail^lt 

tn  rt^ufs  T ) .  H<s  tof  lyaM  r-f^uirtd.  Powtr  rack  includtd. 
*?9.95 

TU-PyE  UidK)   E^c^intion    for      PET^CSM      aLlowi      plii*-conn*cl  ion     of 

'»0'ji'  CCMru1*r  to  *n  wT  trnal  vidto  rtoni  tor  6r  TU  c;onw*rl«r. 
Uni^MF  co'nntci  sri  alLsw  at  tachrt«ni  at  oth»t-  cabltt^ 
**riFh#ral*   wia    Contact    n^wmiotn.       •29.95 

Tli-eDM        Inttrfac*   TRS-SO    ta  RS-232    rrintvin  uck  m*    tki      Hutkkit 

K-14.      Plu*«    inio    printtr.    Radio  SKack  ntrtn^iaa      initrftct* 

Ho  iQftyar*  rt^uLPtd,  illovt  p^inttr  to  run  «t  nt  AvtinuM 
**■•«].      Hothin*    tU*    TO   Ixi-*'      «69.9e 


Virgiaia   Micro    Systems 

1408  [daho  Siiici,  Wocrdbrldge,  Vlr^Lnli       23191 
(703J  494-4057 
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Using  Disk 
Overlays  On 

I  llG  I^C  I    Marty  Franz 

If  you've  written  very  large  BASIC  programs  on  the 
PET,  there've  probably  been  times  when  you've 
wanted  to  break  thern  into  smaller  pieces  to  save 
storage  or  make  maintenance  easier.  As  an  example  of 
this,  consider  disk  utilities:  you  don't  need  to  have  the 
code  necessary  to  copy  files  and  check  for  errors 
loaded  into  storage  along  with  the  code  to  list 
the  disk  directory,  since  you  will  only  be  performing 
one  of  those  functions  at  a  given  time.  Instead,  it'd 
be  nice  to  write  small  "copy  files"  and  "list 
directory"  programs  and  just  toad  the  one  needed. 
To  make  accessing  these  programs  more  convenient, 
a  master  program  could  then  decide  which  one  to 
load  based  on  your  input.  When  the  little  utility 
programs  were  done,  they'd  reload  the  master  program 
again  to  allow  another  selection. 

This  approach  to  program  design  is  called 
"overlay  segmenting".  It  has  several  advantages 
over  putting  every  desired  functitm  into  a  single 
large  program.  One  is  storage  efiiciency:  only  the 
code  needed  to  perform  a  specific  function  is  loaded 
in  storage  at  any  given  time.  Another  is  modularity: 
when  a  bug  is  found  yoti  only  have  to  modify  a 
single,  small  program.  Also,  if  you  want  to  add 
another  function  you  only  have  to  write  the  program 
that  implements  it  and  make  the  master  program 
"aware"  of  how  to  load  it. 

Fortunately,  the  PET  allows  one  program  to  load 
another  by  letting  you  put  LOAD  statements  in 
BASIC  programs,  It  will  even  suppress  the  normal 
SEARCHING  FOR  and  LOADING  messages,  so  the 
user  won't  notice  that  another  program  is  being 
loaded. 

Unfortunately,  there's  a  serious  restriction  on 
this:  the  overlay  program  must  be  smaller  than  the 
program  loading  it!  This  is  because  the  pointers 
that  tell  BASIC  how  large  the  program  is  and  where 
the  variables  are  kept  aren't  reset  when  a  LOAD 
is  done  from  another  program.  The  Microsoft  people 
have  done  this  so  that  the  new  program  can  access 
the  previous  one's  variables.  But  it  means  that  the 
master  program  has  to  be  the  largest  program  in 
our  utility  package.  What  if  we  want  to  add  an 
"edit  files"  function?  It'd  be  nice  to  use  all  the 
memory  available  to  us  for  keeping  text  while  we 
were  editing  it.  With  the  master  program  hogging 
storage  to  insure  that  its  over  lays  will  always  be 
smaller,  this  will  severly  limit  what's  available  to 
our  editor. 

To  have  a  really  useful  disk  overlay  scheme,  then, 


we  have  to  get  around  this  restriction  on  [jrograni 
size.  For  that,  we  have  to  know  how  BASIC 
programs  arc  stored.  Addresses  42  and   13  on  new 
PETs  are  a  pointer  (low  and  high  bytes)  to  where 
variable  storage  starts  in  a  BASIC;  progiam.  It  also 
tells  where  the  program  text  entis.  If  we  poke  these 
addresses  with  larger  [xiinter  value,  we'\-e  effectively 
increased  the  size  of  our  program. 

So,  a  way  to  insure  that  our  program  is  always 
bigger  than  the  one  we're  going  to  load  next  is  to 
set  the  "program  end"  poituer  right  before  the  L(])AD 
statement.  What's  the  largest  possible  value  we  can 
give  to  is  pointer?  It's  the  highest  RAM  memory 
address,  kept  for  us  at  addresses  52  and  53.  V\^e 
want  to  make  it  one  page  (256  bytes)  less  than  that, 
actually,  because  BASIC  might  need  iniciim  storage 
for  variables. 

When  the  new  program  is  loaded  antl  begins 
running,  the  first  thing  it  will  have  to  do  is  tell 
BASIC  how  big  it  really  is,  so  that  the  rest  of 
storage  can  be  freed  up  for  use  by  its  vai-iables. 
Luckily,  the  actual  length  of  a  program  is  kept  by  the 
LOAD  routines  at  addresses  201  and  202.  So,  we 
reset  the  pointer  at  address  42  to  this  value  before  we 
do  any  processing  in  our  overlay. 

The  only  flaw  in  this  scheme  is  the  ])revious 
program's  variables.  BASIC  keeps  track  of  where 
variable  storage  begins  and  ends,  and  it's  based 
on  the  end-of-text  pointer.  Each  time  we  mess  with  this 
pointer  we  have  to  get  BASIC  to  clean  up  variable 
storage  for  us.  The  CLR  statement  will  do  that. 

Our  overlay  scheme  is  now  complete.  Whenever 
we  load  an  overlay,  we  make  our  program  as  large 
as  possible  beforehand  to  avoid  the  length  restriction: 

996  POKE  42,PEEK(52) 

997  POKE  43,PEEK(53)-1 

998  CLR 

999  LOAD  "next", 8 

And,  when  the  overlay  begins  execution,  we  first  reset 
the  program-end  pointer  to  the  actual  ])rogram  size: 

1  POKE  42,PEEK(201) 

2  POKE  43,PEEK(202) 

3  CLR 

The  CLR  statements  clean  up  the  variables  for  us, 
and  we  allow  one  page  less  than  the  largest  RAM 
address  for  interim  storage  of  BASIC  variables. 

There  are  two  "gotchas"  involved  in  this  o\'erlay 
scheme,  however.  The  first  is  that  if  we  want  to 
pass  variables  between  overlays  we're  out  of  luck, 
because  the  CLRs  will  clobber  whate\ei'  was  kept  in 
storage.  In  a  future  article,  I'll  discuss  a  secure  way 
to  pass  parameters  between  programs.  For  now,  we 
can  POKE  variables  into  a  protected  storage  area  like 
the  second  cassette  buffer  and  have  them  remain 
intact  during  the  LOAD  process.  We'll  have  to  do  this 
for  the  name  of  the  program  you're  loading  if  it's 
going  to  be  kept  in  a  string.  That's  why  we  kept  a 
page  of  storage  free  for  variables  when  we  increased 
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the  program's  size:  After  the  pointer  is  reset,  we 
need  to  fisli  the  name  of  the  program  out  ol  proieeieti 
storage  as  a  string  so  we  ean  do  the  LOAD.  The 
sample  master  program  shows  how  this  is  done. 

The  second  "goteha"  relates  to  writing  and 
testing  overlays.  It's  probably  a  good  idea  to 
omit  the  entry  and  exit  linkage  from  them  while 
they're  being  tested.  Why?  Each  time  the  program 
is  run,  it'll  reset  its  end-oi-program  pointer  to 
the  value  it  had  when  it  was  last  loaded.  This  is 
very  bad  when  you  make  a  lot  of  changes  and  the 
program  size  is  altered  dramatically.  You  could  lose 
all  your  changes  (at  best)  or  mess  up  your  program 
to  the  point  where  you  can't  do  anything  with  it 
(at  worst).  When  debugging  an  overlay,  type  NEW 
before  loading  it,  and  be  sure  to  save  a  copy 
before  running  it  again. 

There  are  many  applications  for  overlays.  For 
example,  the  master  program  could  use  light  pen 
input  to  select  the  overlays,  simplifying  the  user's 
interface  to  the  PET.  If  the  overlays  were  carefully 
written  to  lake  all  their  parameters  from  memory, 
the  master  program  could  read  input  iVom  a  Hie, 
and  complex  functions  could  be  built  up  from  lists 
of  simpler  ones:  a  file  could  tell  the  master  program 
to  first  assemble,  then  run,  a  6502  machine- 
language  program  by  calling  assembler  and  loader 
overlays.  This  is  called  "batch"  or  "command 
language"  processing  and  is  done  on  much  larger 
computer  systems.  Suffice  it  to  say  that  with  the 
ability  to  do  o\'erlay  segmenting,  the  power  of  the 
PET  for  serious  programming  is  greatly  enhanced. 

,m   REM  SRMPLE  MhSTER  PRCiGRhM 

110  REM  USING  PET  DISK  OVERLRVS 

120  REM 

1 38  POKE  42 ..  PEEK  ■::  2Q 1  >  :  POKE  4:3 ..  PEEK  ( 202 ) 

140  CLR 

150  REM   IHITIRLIZE  PROGRhM 

Itiy  l!F$="-"  ;Slt="      "+riF*+"liil" 

170   OPEN    15..  3..  15 

1;30   REM      RSK   FOR   F'ROGRRH   hlRME 

190  PRINT  ■  PRINT  :  PRINT"PROGRRM" .:  SI*.; 

200  INPUT  P* 

210  :IF  P$=riF*  THEN  198 

220  :IF  P$="BVE"  THEN  HEW- END 

230  REM  CHECK  DISK  FOR  PROGRRM 

240  OPEN  l..S..2..Pif+"..  P..R" 

250  GOSUB  500 

260  CLOSE  1 

270  IF  E=0  THEN  300 

2S0  : PRINT :PRINTEN$ 

k'yy   :  ijuTO  130 

:500   GOiiiUE   :360 

310  POKE  42. .PEEK';  52; -POKE  43..  PEEK(53>-1 

320  CLR 

:j:50  GOSUE  430 

340  LORD  "P$..  S 

■350  END 

360  REM  SRVE  Pf  IN  TRPE  BUFFER 

370   POKE   827..  L£N(P*)  :R=S2S 


:330 

FOR  1  =  1  TO  LEH-rpf) 

390 

;POKE  R..RSC<f1ID*';pf..  I..  1)> 

400 

:R=R+1 

410 

NE^T  I 

420 

RETURN 

430 

REM   GET  Pf  FROM  TRPE  BUFFER 

440 

p$="":H=32y 

450 

FOR  1=1  TO  PEEK < 327 > 

460 

:p$=p$+CHR*';PEEK<H>> 

470 

:R=fl+l 

480 

NEXT  I 

490 

RETURN 

500 

REM  CHECK  DISK  ERRORS 

510 

E=0 

520 

INPUT#15..EH..EM*..ET..ES 

530 

IF  EN=0  THEN  RETURN 

540 

E=l 

550 

RETURN                         © 

NEW!! 
Programs    for    Commodore's    PET 

Business     Research  $50 

Make    better     deciiions     with    this 
high     power    MBA    business    tool.    16k. 

Home  &  Small  Business  $15-$40 

•  Addresser       •Inventory 

•  Shopper  •Dinner's  Onl 

Each  has  a  buil  f-in    printer  option. 


•  Games  &Simulations 

•Fur   Trapper       •High  Seas 
•Mansion!     •Pentagon!     •Museum! 

•Education    Pack 

High    School    sampler     with 
geometry,    algebra   &chemistry. 


Send    for    full     catalog! 


$15ea. 
$15 


HARRY   H.    BRILEY 

P.O.  Box  2913 
Livermore,  CA  94550 

(415)  455-9139 


PET  SOFTWARE 


LAS  VEGAS  CASINO  SERIES: 

These  four  programs  were  developed  both  as  a  tutorial  for  those  planning  to  visit  a  Casino  and  w^anting  to  learn  to  play  correctly,  and  as  a 
means  for  the  serious  garnbler  to  develop  and  thoroughly  test  a  gambling  'system'  under  actual  Casino  conditions.  All  betting  odds  and 
options  available  in  the  Casino  of  the  IVIGM  Grand  Hotel  in  Las  Vegas  have  been  incorporated  into  these  programs.  Full  screen  graphics 
have  been  used  to  show  the  cards  being  dealt,  the  Roulette  Wheel  spinning,  and  the  Dice  being  thrown  in  order  to  increase  realism  and 
heighten  enjoyment. 

1.    Casino  Blackjack: 

For  1  to  5  players  plus  the  dealer.  Keeps  track  of  winnings  or  losses  for  each  player  plus  number  of  fiands 
won,  lost,  and  tied  and  the  number  of  times  the  dealer  and  each  player  has  busted.  Play  with  1,  2,  or  4 
decks.  Change  decks  or  reshuffle  at  any  time.  Split  pairs.  Double  Down,  or  place  an  Insurance  bet. 
Full  Casino  rules  and  many  other  options 


$  7.95 


Casino  Roulette: 

Bet  on  one  number,  two  numbers,  odd,  even,  black,  etc.  Watch  the  numbers  come  up  as  the  wheel  spins. 

Twelve  ways  to  bet $  7.95 


Casino  Baccarat: 

James  Bond's  favorite  game.  Two  games  in  on.  Casino  style  and  Blackjack  style.  Includes  special 
features  to  help  In  developing  a  winning  'system' 


$  7.95 


4.  Casino  Craps: 

Bet  the  Dice  to  Pass  or  Fall  Off.  Bet  the  Hardway  or  Press  with  Double  Odds. 

Ten  ways  to  bet _ %  7.95 

5.  Casino  Package: 

Ail  four  Casino  Programs  above S24.95 

STRATEGIC  GAMES: 

6.  Backgammon: 

Play  Backgammon  against  your  PET.  Excellent  graptiics  and  doubling  option 

make  for  a  fast  and  exciting  game %  9.95 

7.  SP(*)  INTRUDERS:  (WITH  SOUND) 

Written  by  COMMODORE-JAPAN.  Performs  exactly  like  the  popular  video  arcade  version  being  played  all 

over  the  country.  Machine  language  graphics  and  sound  provide  hours  of  entertainment S  9.95 

8.  Checkers: 

Play  against  ttie  PET.  PET  plays  a  good,  fast  game  according  to  International  Checker  Rules.  Excellent 
graphics  show  the  board  and  all  checkers.  Watcfi  your  PET  move  his  man  around  the  board.  Clock  shows 
elapsed  time  for  each  move $  7.95 

9.  Qubic-4; 

Tfiis  is  three  dimensional  Tic-Tac-Toe  played  on  four,  4x4  boards.  PET  plays  a  fast  exciting  game 

choosing  one  of  three  strategies  for  each  game S  7.95 

10.  Go  Moku: 

Ancient  Chinese  board  game  played  on  a  9  x  9  board.  Get  5  men  in  a  row  before  your  PET.  A  different 

strategy  for  each  game S  7.95 

11.  Othello: 

English  game  known  as  Reversi.  Try  to  capture  the  PET's  men  before  he  captures  yours.  Play  against  the 

PET  or  against  your  friends.  Fast  and  fun $  7.95 

12.  Cribbage: 

An  Excellent  version  of  this  favorite  card  game.  All  cards  are  shown  using  PET's  excellent  graphics. 

The  PET  plays  a  cool  logical  game  difficult  to  beat  even  for  the  best  players $  7.95 

13.  Game  Package: 

Any  six  of  the  above  programs $34.95 

GUARANTEE:  All  programs  are  guaranteed  to  be  free  from  errors  and  to  load  on  any  PET.  Any  defective  tapes  will  be  replaced  free 
of  charge. 


Order  From:  CMS  SOFTWARE,  5115  Menefee  Drive,  Dallas,  TX  75277 
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Joystick 
Revised 

Harvey  B,  Herman 
Chemistry  Department 
University  of  Nortti  Carolina  at 
Greensboro 
Greensboro,  N.C  27412 

My  previous  article,  "PETing"  with  a  Joystick", 
(Compute  #4)  game  some  general  hints  on  how  to 
interface  a  joystick  to  the  PET.  In  particular  I  showed 
how  to  modify  BASIC  programs  so  that  they  worked 
with  this  device.  Nevertheless,  it  is  still  a  pain  to 
change  the  large  number  of  old  programs  that  may 
already  be  in  one's  library.  I  looked  around  for  an 
easier  way  to  interact  with  the  joysticks  that  would 
entail  minimal  modification  of  pre-existing  programs. 
This  article  discusses  a  machine  language  program 
that  allows  one  to  use  joysticks,  without  any  changes 
in  programs  which  use  the  conventional  keyboard 
pattern  to  indicate  the  direction  of  player  movement. 

Last  year  Kilobaud  Microcomputing  (March 
1979)  had  an  article  on  the  PET  User  Port.  The 
author,  Gregory  Yob,  illustrated  some  software 
which  would  service  an  additional  keyboard  connected 
to  the  User  Port.  The  PET  interrupt  routine  uses 
a  pointer  in  RAM  which  can  be  changed  to  point 
to  special  User  code.  In  the  PET  every  60th 
of  a  second  an  interrupt  is  generated  to  service, 
among  other  things,  peripherals  like  the  screen  and 
keyboard.  It  is  possible  to  modify  the  pointer  to 
service  a  foreign  device  (in  the  above  article  the 
new  keyboard)  before  proceeding  with  the  normal 
interrupt  processing.  I  used  this  idea  to  write  a 
machine  language  program  which  would  service  a 
joystick  connected  to  the  User  Port. 

The  joystick  controller  program  (shown  in  the 
figure)  has  three  entry  points.  The  first  (XON) 
is  used  to  manually  initialize  the  interrupt  vectors, 
program  variables  and  User  Port.  The  second  (XOFF) 
is  used  to  manually  disable  the  operation  of  the  pro- 
gram and  to  restore  the  old  software  vectors.  The 
third  (PCODE)  is  automatically  entered  after  the 
next  interrupt  once  the  program  has  been  initialized. 

The  code  from  line  500  on  is  the  main  section 
of  the  joystick  handler.  It  puts  a  number  in  the 
keyboard  buffer  which  indicates  the  direction  to  move 
next.  This  number,  of  course,  depends  on  the  position 
of  the  joystick.  The  program  attempts  to  minimize 
contact  bounce  by  determining  if  the  character  is 
stable  at  the  User  Port  for  two  successive  (2  x  1/60  sec) 
jitfies.  This  value  can  be  experimented  with  to  suit 
one's  taste.  The  program  follows  the  Yob  example 
and  does  not  allow  the  keyboard  buffer  to  overflow. 
A  simplified  flow  chart  of  the  main  section  is  shown 


in  the  figure.  Modifications  necessary  for  new  ROMs 
are  shown  in  the  table  (not  tested). 

The  number  returned  from  the  User  Port  falls 
in  the  range  63  to  255  (decimal).  It  is  converted 
by  a  shift  and  AND  operation  to  a  unique  number 
in  the  simpler  scale  of  3  to  15  (decimal)  (INT(T/16) 
and  T).  This  number  in  turn,  is  converted  by  table  look 
up  to  an  indicator  of  direction  movement  and  stored 
in  the  keyboard  buffer.  A  simple  example  should 
help  to  clarify  matters.  Use  the  table  in  my  previous 
article  for  reference. 

If  joystick  1  is  positioned  left,  the  hex  value  read 
at  the  User  Port  is  DF  (223  decimal).  The  binary 
equivalent  of  this  number  is: 

UOl  1111 

Next  shift  right  four  times(INT(T/16))  and  the  number 

is: 

0000  1101 

Finally,  AND  with  the  original  number  (AND  T). 
The  result  of  these  operations: 

0000  1101 

is  CD  hex  or  13  decimal 

This  number  is  nol  in  the  normal  keypad  move- 
ment pattern.  However,  we  can  convert  it  to  'move 
left  'by  reading  a  table  whose  14th  value  is  ASCII  '4'. 
The  later  number  is  stuffed  into  the  keyboard  buffer. 
By  positioning  the  joystick  left,  we  end  up  with  the 
same  result  as  if  we  had  typed  '4'  on  the  keyboard. 
BASIC  programs  which  use  '4'  to  move  left  can  be 
used  without  any  modifications.  A  similar  analysis 
applies  to  both  joysticks  and  to  all  the  other  numbers 
in  the  normal  keypad  movement  pattern.  In  addition, 

1  chose  to  make  the  button  press  mean  the  number 
five  and  straight  up  mean  no  keypress. 

The  hex  values  given  in  the  listing,  can  be  con- 
verted to  data  statements  using  a  program  which 
appeared  in  the  PET  Gazette  (H.  Sherman,  Spring 
'79,  p.  14).  Alternatively,  one  could  use  a  monitor 
program  to  load  this  program.  In  either  case  a 
monitor  program  is  probably  the  best  way  to  enter 
the  hex  values  initially. 

The  joystick  controller  program,  described  here 
has  been  helpful  to  me  when  converting  programs 
that  use  one  joystick.  A  slightly  more  complicated 
version  would  be  necessary  if  one  needs  to  use  both 
joysticks  in  a  two  player  game.  I  will  be  happy  to 
answer  questions  about  the  interface  or  program  if 
you  include  a  SASE. 

TABLE 
Old  PET/New  PET  Equivalent  Locations 
Description  Old  New 

Hardware  interrupt  vectors  3219/S21A  S90/S91 

Hardware  interrupt  routine  SE685  SE62E 

Keyboard  bulfcr  index  S20D  S9E 

Start  of  keyboard  buffer  $20F  $26F 

Interrupt  return  $E67E  $E6E4- 
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PARTIAL  FLOW  CHART 

Joystick  Controller  Program 

I 
Compare  previous  character 

different 


second  compare 


>  second  compare 


set  first  flag 


I  store  previous  character 

decrement  '^^"  ^"'  ^^S>  return 

number  counter 


repeat  character  zero   zero 


not  time 
return 


initialize  number 
counter(12hez,  18  dec) 


shift/AND 

table 

lookup 

zero 

zero 

in  keyboard  buffer 

Store 

no  keypress 

or  illegal 



return 

Olio 

;    JOYSTICK    CONTROLLER    PROGRAM 

0120 

.Bfl    133A 

0130 

;     DISABLE    INTERRUPTS 

0  33A- 

78 

0140 
0150 

XON                         SEI 

;     SET    UP    NEU    INTERRUPT    VECTOR 

033B- 

A9 

6A 

0160 

LDA    #£6A 

l)33D- 

8D 

19 

0£ 

0170 

STA    4219 

03^40- 

A9 

03 

0  180 

LDA    »i3 

03^2- 

8D 

lA 

02 

0190 
0200 

STA    S21A 
;     INITIALIZE    USER    FORT 

03<I5- 

A9 

00 

0210 

LDA    *iO 

03-17- 

8D 

4  3 

ES 

0S2O 
0230 

STA    iE843 
;     INITIALIZE    PRQGRAK    VARIABLES 

0  3ilA- 

A9 

FF- 

0240 

LDA    #1FF 

0  3ac- 

BD 

CB 

03 

0250 

STA    PREV 

0  34F- 

BD 

CC 

03 

0260 
0  27  0 

STA    FIRST 
J  ENABLE    INTEBBUPTS    AND    RETURN 

0352- 

58 

0  2B0 

CLl 

11  353- 

60 

0  29  0 
0300 

HTS 
;     DISABLE    INTERRUPTS 

B351- 

76 

031  0 
0320 

XOFF                      SEI 

;     RESTORE    INTERRUPT    VECTOR 

0355- 

M 

85 

0330 

LDA    #1SS 

0357- 

8D 

!9 

02 

0340 

STA    J219 

0  35A- 

A9 

E6 

0350 

LDA    #iE6 

035C- 

SD 

lA 

02 

O360 
0370 

STA    i2lA 
J    ENABLE    INTERRUPTS    AND    RETURN 

035F- 

58 

03SO 

CLI 

0360- 

60 

0  39  0 
0400 

KTS 
;    ADJUST    STACK 

0361- 

A9 

00 

041  0 

STAX                    LDA    *iO 

036  3- 

4B 

0420 

PHA 

036«- 

as 

0430 

PKA 

0365- 

46 

0440 

PHA 

0  366- 

46 

0  45  0 
0  46  0 

PHA 
;     CONTINUE    INTERRUPT    PROCESSING 

036  7- 

JiC 

65 

E6 

0470 
048  0 
0  49  0 

JMP    IE685 
;    MAIM    JOYSTICK    HANDLER 
;    LOOK    AT    USER   PORT 

0  36A- 

AD 

4F 

ES 

0500 
051O 

PCODE                 LDA    SE84F 
i     SAME7-YES. 

SECOND? -ADD    TO    KEYBOARD    BUFFER- 

05EO    ; 

THIRD   OR    GBEATEH7-KEEP    CQOTT. 

0530    1 

ADD   TO    BUFFER    IF    >     12    TIMES 

0  54  0  ; 

RETURN    IF    HOT 

0550    ; 

NO.       RESTORE    VARIABLES    AMD    RETURN. 

036D- 

CD 

CB 

03 

0  56  0 

CMP    PREV 

037  0- 

ro 

OE 

0570 
0  5SO 

BEQ    EQ 
1    NOT    SAME 

03" 

2- 

SD 

CB 

03 

059  0 

STA    PREV 

0375- 

A9 

00 

0600 

LDA    no 

0377- 

6D 

CC 

03 

061  0 

STA    FIRST 

0  37A- 

4C 

B4 

03 

0620 
0630 

;     SAME 

JMP    FltJI  SH 

037D- 

2C 

CC 

03 

0640 

Efl 

BIT    FIRST 

0380- 

10 

08 

0650 

BPL    SKIP 

0660 

;     THI RD    OR    GREATER 

038e- 

CE 

CD 

03 

0670 

DEC    NUKB 

0385- 

FO 

06 

0660 

BED     RESET 

0690 

;    <     12    REPEATS 

0  387- 

4C 

B4 

03 

0700 
0710 

;     SECOND 

JMP    FINISH 
TIME 

0  38A- 

A9 

FF 

07EO 

SKIP 

LDA    *1FF 

0  3SC- 

8D 

CC 

03 

0730 
0740 

;     PICKUP 

STA    FIRST 
>     12    TIMES 

0  3BF- 

A9 

OC 

O750 

RESET 

LOA    «12 

0391- 

BD 

CD 

03 

O760 
0770 

;    ACC/16 

STA    NUMB 
AND   ACC 

0  394- 

AD 

CB 

03 

0780 

LDA    PREV 

0  39  7- 

4A 

0  79  0 

LSR    A 

0396- 

4A 

0800 

LSR    A 

0399- 

4A 

OSIO 

LSR    A 

039A- 

4A 

0820 

LSR    A 

0  39B- 

2D 

CE 

03 

0830 

AND    PREV 

0840 

J     CONVERT    TO    ASCII 

0  39E- 

AA 

0850 

TAX 

D39F- 

BD 

BB 

03 

0860 

LDA    TABL-X 

0870 

1     ZERO?     RETURN 

0  3A2- 

FO 

10 

0860 

BES    FINISH 

0890 

;     OTHERWISE    STORE    IN    KEYBOARD    BUFFER 

0  3A4- 

AE 

OD 

02 

0900 

LDX    saoD 

0  3A7- 

9D 

OF 

02 

091  0 

STA    S£OF,X 

0  3AA- 

EB 

0920 

I  NX 

0930 

;     WATCH    FOR    BUFFER   QVERFLOU 

0  3AB- 

EO 

OA 

0940 

CPX    #10 

0  3AD- 

DO 

02 

0950 

BNE    COUNTER 

Q3AF- 

A2 

00 

0960 

LDX    *iO 

03B1- 

BE 

OD 

02 

0970 
0980 

COUNTER 
;     BACK    TB 

STX    S20D 
NORMAL    CODE 

03B4- 

20 

61 

03 

0990 

FINISH 

JSR    STAX 

03B7- 

EA 

1000 

NOP 

0388- 

4C 

7E 

E6 

1010 
1020 

I 

JMP    SE67E 

03BB- 

DO 

00 

00 

1  030 

TABL 

.BY    0     0    0     '5-0     '798  • 

03BE- 

35 

00 

37 

03C1- 

39 

38 

03C3- 

DO 

31 

33 

1  040 

TABLl 

.BY    0     -132'    D     -46'    0 

03C6- 

32 

00 

34 

03C9- 

36 

00 

0  3CB- 

00 

1  050 

PREV 

.BY    0 

03CC- 

00 

1  060 

FIRST 

■  BY    0 

© 

03CD- 

00 

1  070 

NUMB 

.BY    0 

1080 

.  EN 

Programs  for  the  Commodore  PET... $4.95 

Jnyslick  progr.ims:  Tbpse  ttuD  g.imes  require  use  of  an  ATARI  joystick  (SIO).  The 
conticci  iofi  Si  heme  IE  idcniicil  lo  ihal  ol  CURSOR.  COMPUTE,  ind  KILOBAUD 
magazines  An  instructtsr  sheet  is  tncluded  for  quick,  simple  conneclxin 

GalactiTarget;  Fly  around  the  galaxy,  obliterating  pop- 
out  targets  with  your  lasers.  Try  to  get  10  in  60  seconds. 
Uses  CB2  sound  (optional). 

Space  Race:  Beat  the  clock  by  piloting  your  starship  160 
"centons"  in  less  than  120  "stardates".  CB2  sound  effects. 


Billboard:  Display  messages  of  up  to  256  characters  in 
BIG  one-inch  letters  on  the  screen.  Features  variable 
scroll  -^  print  speed,  screen  freeze. 
Hangman:  Super-animated  version  of  the  popular  word- 
guessing  game. 

Letter  Squares:  Try  to  get  15  letters  In  alphabetical 
order  on  a  4  x  4  square-board  by  sliding  one  letter  each 
time  into  the  empty  space. 

Crypto  Challenge:  One  player  enters  a  word,  phrase, 
or  sentence.  The  computer  then  translates  that  message 
into  a  cryptogram.  The  player  who  solves  the  other's 
puzzle  in  less  time  wins  the  round. 
High  Rollers:  The  dice  game  in  which  you  must  eliminate 
the  numbers  zero  to  nine  from  a  board. 


ORDERING  INSTRUCTIONS:  Sjnd  M  %  plus  5.50  r&h  lor  each  program 
ordered-  H  vou  wouEd  like  a  printed  listing,  include  SI  each  Plea?e  pay  by  irtonev 
order  or  cashier's  ch«:k  ...  Persona]  checks,  allow  A  w.'ceks  Rl  residents  add  6'V  lax. 


PROGRAMMATICS  Software 

71  Sargent  Ave. 
Providence,  Rl  02906 
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PLEXI  —  VUE " 

SOLAR  SCREEN 

DRAMATIC  IMPROVEMENT? 
YOU  BE  THE  JUDGE! 


\  \ 


SOLAR  SCREEN 

We  urge  you  to  read  this  and  consider  our  PLEXI- 
VUE  High  Contrast  SOLAR  SCREEN.  You  will 
see  it  is  a  small  price  to  pay  for  a  big  improvement! 
Some  consider  it  as  an  Rx  for  tired  eyes!  A-s  you  will 
see  from  our  offers,  you  can  even  gel  one  FREE! 
CONTRAST  ENHANCEMENT 
IS  IT  FOR  YOU? 
We  have  all  experienced  the  eyestrain  acquired 
from  sitting  in  front  of  the  computer  for  too  many 
hours  playing  games  or  working.  That  is  now  a 
thing  of  the  past  due  to  recent  developments  in  the 
area  of  CONTRAST  ENHANCEMENT.  First, 
the  construction  of  most  home  computers  is  such 
that  generally  (he  CRT  screens  are  of  a  phosphor 
light  gray  in  color,  which  makes  it  difficult  to 
distinguish  between  the  white  letters  and  gray 
background.  The  former  method  was  to  turn  the 
CRT  brightness  up  which  increased  contrast  but 
also  increased  GLARE.  This  is  where  the 
eyestrain  comes  in.  What  you  need  is  something 
that  will  INCRE.ASE  the  CONTRAST  while 
DECREASING  the  GLARE.  Several  products  on 
the  market  will  accomplish  this  but  to  different 
degrees  of  .success  and  a  drastic  difference  in  cosl, 
as  you  will  see. 

OUR  PRODUCT 

Wc  produce  the  PLEXI-VUE  High  Contrast 
SOLAR  Screen  from  General  Electric  LEXAN 
which  is  unbreakable.  It  is  neutral  in  color  and  will 
work  with  all  phosphor  screens  including  green. 
This  SOLAR  LEXAN  is  a  sixteenth  of  an  inch 
thick  and  mounts  to  your  computer  within  a 
minute  after  you  receive  it.  You  do  not  need  tools 
of  any  kind,  you  just  strip  off  the  masking  from 
the  foam  adhesive  and  apply  the  unit  to  the  front 
of  the  computer!  Then  you  are  ready  to  enjoy  the 
DRAMATIC  difference  in  viewing  WHITE  let- 
ters on  a  BLACK  screen.  Or  if  you  have  a  GREEN 
phosphor  screen  you  will  see  GREEN  letters  con- 
trasted against  BLACK  as  you  doon  theexpensive 
WANG  and  IBM  computers!  You  will  also  notice 
that  long  periods  of  activity  at  the  computer  will 
not  bring  on  the  resultant  eyestrain  thai  normally 
accompanies  GLARE.  You've  been  driving  into 
the  sun  and  noticed  the  difference  when  you  put 
on  a  pair  of  polarizing  sunglasses;  this  Is  the  kind 
of  change  you  will  see  by  installing  PLEXI-VUE! 


SATISnED  USERS! 

We  have  been  producing  and  selling  the  PLEXI- 
VUE  for  about  a  year  and  a  half  and  have  quite  a 
following  among  users.  We  have  sold  to  a  large 
number  of  Colleges,  Universities,  Schools, 
Lawyers,  C.P.A.'s,  Doctors,  Hospitals  and 
Laboratories.  Wc  know  they  are  pleased  because 
they  immediately  re-order  more  PLEXI-VUEs  for 
other  computers.  Testimonials  from  users  range 
from,  "AMAZING!"  to  ".  .  .  really  like  it,  enter 
my  order  for  another!"  Don't  take  our  word  for 
it,  ask  somebody  who  owns  one! 

THE  COMPETITION 
The  SUN-FLEX  Optical  Filter  at  S20.00  for  the 
smallest  version,  consists  of  a  fine  screening 
material  with  a  plastic  border.  It  increases  con- 
trast but  creates  a  moire  effect  on  the  screen  if 
your  program  has  animation.  It  will  also  bother 
you  if  you  have  any  degree  of  astigmatism.  You 
can  blow  through  the  fine  screening  material,  and 
have  to  be  very  careful  not  to  damage  it. 
The  POLAROID  CP-70  Polarization  Filter  also 
increases  contrast  and  decreases  glare.  It  costs 
from  S26.00  for  a  formed  plastic  filter  or  from 
S68.00  for  laminated  glass  versions.  Brackets  are 
provided  for  mounting. 

The  GLARE-GUARD  by  Optical  Coating 
Laboratory  sells  for  $95  for  certain  computers  only. 
It  is  a  very  high  quality  circular  polarization  material 
laminated  between  two  pieces  of  reflection  cancelling 
coated  glass.  It's  thick  and  heavy,  and  requires 
special  mounting.  Used  in  some  expensive  terminals. 
Material  can  be  purchased  for  cuslom  fabrication  for 
small  computers.  As  with  the  SUN-FLEX  AND 
POLAROID  versions  the  screens  look  "added  on" 
due  to  the  way  they  are  mounted. 
SOME  OTHER  COMPANIES  PRODUCE  A 
MYLAR  FILM  THAT  YOU  WET  AND  APPLY 
TO  THE  CRT  TO  DARKEN  THE  SCREEN.  WE 
WILL  NOT  MENTION  THEM  ANY  FUR- 
THER THAN  TO  SAY  THEY  ARE  A  RIP-OFF! 

DRAWBACKS 
We,  like  other  manufacturers  of  contrast  enhance- 
ment devices  do  not  recommend  their  use  if  you  in- 
tend to  use  a  lighl  pen.  Since  the  screens  cut 
GLARE,  they  also  reduce  lighl  intensity  which  is 
needed  by  the  photocell  in  the  pen.  Our  screen 
works  with  some  pens,  but  we  would  rather  caution 
you  than  disappoint  you  after  you  purchased  it. 


FREE  TRIAL  OFFER 

We  urge  you  to  test  the  PLEXI-VUE  Screen  now. 
Order  one  for  our  30-day  no  obligation  trial.  See 
the  dramatic  difference  it  makes  on  your  com- 
puter. See  how  much  easier  it  is  to  read  text  with 
the  higher  contrast,  and  how  much  more  you  en- 
joy your  computer.  Your  friends  will  notice  the 
new  appearance  as  the  above  photos  show.  We 
can  make  this  offer  because  we  have  a  QUALITY 
PRODUCT,  at  a  REASONABLE  PRICE  that  we 
feel  will  meet  with  your  approval,  if  youwillGIVE 
IT  A  TRY! 

After  you  have  used  it,  decide  if  you  want  to  keep 
it.  If  you  do  you'll  own  the  most  affordable  con- 
trast enhancement  device  on  the  market,  [f for  any 
reason  you're  not  completely  satisfied,  simply 
return  your  screen  with-in  30  days  for  a  prompt 
and  courteous  refund.  You  can't  lose! 
To  order  your  PLEXI-VUE  for  our  free  trial, 
simply  send  your  personal  check  or  money  order 
for  $14.95  +  SI.OO  Shipping.  We  accept 
MASTERCHARGE  or  VISA!  Give  ACCOUNT 
NUMBER,  INTERBANK  NUMBER,  EXPIRA- 
TION DATE,  AND  SIGN  your  order.  Give 
Model  Number  needed  from  CHART: 

PXI  =  PETs/CBMs  with  METAL  CRT  Cases. 
PX2  =  PETs/CBMs  with  PLASTIC  CRT  Cases. 

PX3  =  NEW  80  Character  CRT  CBMs. 

*  *  FREE  PLEXI-VUE!  *  • 

Ordera  SOFTPAC-I  al  the  Regular  price  of  $34.95 
■f  SI  .00  Shipping  and  we'll  GIVE  you  the  PLEXI- 
VUE  FREE!  The  30  day  TRIAL  OFFER  applies  to 
both!  (You  must  return  BOTH  for  a  refund.) 
SOFTPAC-I  contains  17  programs  on  DISC  or 
TAPE  (SPECIFY)  in  a  Notebook  with  Back-up 
copies,  printed  instructions  &  program  listings! 
GAMES  W/SOUND  loo! 

ORDER  FROM: 


COMPETITIVE 

SOFTWARE 

21650  Maple  Glen  Drive 
Edwardsburg,  MI  49112 
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I  PET  PRODUCTS     f 

^  Program*  —  Workbook* 

•  lor  Floppy  Disk  —  for  Casiette 


sw-r 

SW-3' 
SW-4 
SW  s- 


PROGnAMS 


HAIL!  Tt  vng 

CHECKBOOK  •ttcota 

ACCOUNTS  noiifi  Ifflch  at  AliOQM9))iQijnDw 

Uf  DIT  ce^i*  arid  mainiam  tJali  liltt^ 

CALEHOAB  apPO.nImenls    mMtinjj  flT  B  glflhce 


ucri 


WORKBOOKS 
WS  1    GiFDris  SUrlKl  wirh  Tour  PCT 
WB?  PET  String  tnd  Anay  H«rK3tlna 
VVB  J  P€T  Grxphki 

I   PET  CMiatI*  to 
wa-b   Ulic*tlHi*oui  PET  FviturM 
we-6  PET  Coolroi  and  Lofllc 

iU  "^^430  pfagri'^S   ■'■<  lp*C<ll  pU'pOSf  {J'JlB  MlB  rT^incgffr\flri:  »yl.Tems     Th^if  gil  cii^ 

,  •  Son  numenc  o«  si'ing  delds 

^^  •  Select  basKf  on  numeric  or  sinnj  ( -) 

a.  *  Selocl  basufl  on  lubslrmg  malcf^ 

•  *  SfllpCI  baSfld  On  range  of  entry  number 

^  Prices  S9  9D  each  lor  progiami.  usmg  cassette  storage  for  flata 

L  S1?  95  eaci^  using  SiK^uential  floppy  Oisk  storage  foi  daiA 

*  Pr)c«  IncludM  40-60  p*o*  Inttiuctlofi  miniiil 
U  Add  iJOO  Fo' Sh.ppmg  and  hanflling                                                             jlS 

P.O.  BOK  »1.D«f]t.  Q 
lot  Mmma:  Nti  BTS44 


Money  DBC» 


On  Dank  Card  O'ders,  gme  All  riumbflfS 
PE  r  ij  a  irjtM'i-arh  o'  Commodor*  Bu'^ims  MithmOT 
■  PET  «  PET  *  PET  ■  PET  •  PET  •  PET  •  PET  •  PET  •  PET  •  PET  •  PET  •  PET  •  PET  •  F 


PET/cBM  UNCRASHER  " 

WHAT  IS  IT?  —  UNCRASHER"  is  a  two  buttun  device  ihal 
allows  PET/CBM  users  to  regain  control  of  a  cursorthat's 
been  lost  due  to  programming  errors.  BASIC  progfams 
may  be  recovered.  Machine  language  programs  in  the 
second  cassette  buffer  are  not  disturbed  uither. 

WHICH  PETs/CBMs?— UNCRASHER"  isfotall  PET/CBM 
computers  that  use  tliu  "NEW  Version  2  ROMs.  (Older 
model  PETs  should  use  the  ITS  NEW-CURSOR".) 

DOES  IT  WORK?  —  You  betlfi  See  the  detailed  review  of 
the  types  of  crashes  and  the  concept  of  recovery  m  the 
fifst  issue  of  Compute. 

INSTALLATION  —  Simple,  completely  illustrated  instruc- 
tions using  only  a  Phillips  screwdriver  ensure  installation 
in  minutes.  No  soldering  or  modificaitons  to  the  computer. 

OPERATION  —  Just  follow  the  simple  steps— push  the 
buttons  and  reset  the  stack  pointer — and  PRESTO  .  .  , 
recovery! 

And  all  this  happens  without  powering  the  PET/CBM  down  and  up. 

WHY  UNCRASHER"?  —  No  first  class  computer  such  as 
Ihe  PET/CBM  should  be  without  this  capability.  Whether 
your  fancy  be  programming,  business,  educaiion,  or  hobby, 
hobby.  UNCRASHER"  saves  you  time  by  uncr ashing  your 
slip-ups. 

AVAILABILITY  —  Now  in  better  computer  stores,  or  order 
direct  from  ITS,  made  by  the  people  who  brought  you 
NEW-CURSOR". 

INTERNATIONAL  TECHNICAL  SYSTEMS  INC. 

P.O.  BOX  264  WOODBRIDGE,  VIRGI^JtA  22194 

CtJSTOMER  SERVICES  - 

RICHMOND,  VIRGINIA  (804|  262-9709 

$14.95 


BLACKJACK  ANALYZER 

PUT  PET  TO  WORK 

PLAYS  100,000  games  in  24  minutes. 
Find  the  most  advantageous  method. 


User  defines  player  method  by  simple  keyboard  entry  including 
when  to  hit  and  double  on  soft  and  hard  hands,  split  pairs  and 
take  insurance.  Then  run  simulator  and  see  resulting  gain  or 
loss  in  24  minutes  run  time 

Uses  4  Decks   Full  casino  rules.  Countless  permutations. 

-OR  - 
Switch  to  visual  play  and  watch  your  system  in  real  time. 
8K.  Specify  old  or  new  ROM,  6502  ML 
Cassette  Tape   - $12.00 

COUNTING  TUTOR 

Play  Blackjack  and  win  by  keeping  track  of  high  and  low  cards, 

Program  displays  count  on  request  if  you  lose  track.  A  real  time 

simulator. 

BK.  Specify  old  or  new  ROM,  6502  ML 

Cassette  tape    J6.00 

Maico 

54  Desbeth  Court 
Toronto,  CANADA 
M4A  1M6 


BUSINESS       *   EXPERIMENTAL       ir    EDUCATIONAL 
TELECOMPUTING         -ti   PERSONAL  ir    RENTALS 


Bliiiro  sys+ems  by 

r=-E:-r-re:i3 

|^va^rd^uare  aj-th  a  sott  touchT 


SPECIALIZING  IN 

Commodore  Business  Machines 

PRODUCTS  BY 

CmC,  NOVATION,  TNW  CORP.,  BI2COMP  MICRO,  CENTURY 
RESEARCH.  TAB,  POWR  PROTECTR,  systems.  BASE  2, 
OSBORN,  Eaton,  SOURCE.  MACTRONICS,  MicroNet,  Skyles, 
KILOBAUD,  Dr,  DALEYS,  INSTANT  SOFTWARE,  ASCRO,  MICRO 
SOFTWARE  SYSTEMS,  COMPUTER  FORUM,  COMPETITATIVE 
SOFTWARE,  HAYDEN.ATARI.NEECO.COMPUTE&COMPUTE  II. 
DYSAN,  CREATIVE  COMPUTING.  LIVERMORE  RESEARCH, 
ROBOTICS  AGE.  SYBEX.  KNIGHT  ENTERPRISES. 
Another  Last  Minute  News  Note:  Commodore  has  announced  that 
the  three  for  two  educational  offer  is  on  again. 

Send  For  Our  Free  Catalog 
Mail  Orders  To: 

PETTED 

P,  O,  BOX  21851 

Milwaukee,  Wisconsin  53221 

PETTED  micro  systems 
is  located  across  from  the  SURFIN'  TURF  skate  board  park 
Highway  1-894  &  Hwy  36  4265  W.  Loomis  Rd. 

Milwaukee,  Wiscor)sin 
VOICE  (414}  282^181  i-  PBBS  (414)  282-81 18 


V1S4* 


TCB687 


master  ctiarge 


_  10041,101 

* 

IN  Michigan  Dial  PBBS*  I      (313)  484-0732 
tr     Vendors  Display  Your  Products  With  Us. 
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I^i^:£mBSi' 


Z^l&ouT    -rut  OPseri  I?ort..., 


2"»  CAK^TTg 


(lookiw*    fir    BACK  of    PET: 


5 


"-USER  pOitT    PKTA  LIMES     J 


3 
V9 


UT'5      UMOERSTAhiPAELE    THAT    A     NEtJConER.   Tb   THE 
PET     MAY    PlK>P     THE    OPERATJOO    OP   THE     Uset^  PoRT 

A  Lmte  ftoRMiDAav-E    AT  Fiwr,  our    its  really    roor 

AS     HARD     To    uNpERSTAWfi    AS    IT  UooitS. 

TThe      \<€-i    IS    IW    THE    FU^^CTlO^>;^>fii    oF  THE 
VIA    CM(p  (no.  6S22.P,  WHICH   VST^E  tortPintfti 
LI«K    To  THE  tourSlbE    tJe.RLl>,      L'^^CS    FRom 
THIS     CHIP      CONNECT   TC     EitTERjOAL  DEVICES    ffT 
THE     UStR    PORT,      wHIUt  THt   MiCilOpltOOtSSoR. 
COMMU/JlCflTES     WITH    THE    CHIP  dtf£R    THt   OflTA 
SUSj  AS  IF  iTuJEet  A  RECUJ.AR,  MEf^oty    RE&lffTER. 

(2)«E    MtA^RY    tocATioM,  ADt>(U$S     S'9  4  71  ^  IS  DIRECTLY 
u>iRgO     To    EtaHT    oF  THE      USER.     Porr    eofi>»iECTW»AJS, 
PA0-r&  PA7,     "IhESE    gi6HT   U«£S    CAfJ  BE.  IMDIVIPUALL-Y 
PR0<3ftAMMEt>    Te>     8£    CrmCR.    IWPOT    oA    ctnTin"  uM% 
DEPD^Dlioe;      e^     i^^ftT      IS     JW  TH£    PftTA   OlRtCTlOKi 
RE<i(STCe,  APPRESS  59459-     IF  yoo  POXt  59459,^  ^ 

CS(f  ARV    (1(0^0  00001  ;  ,    THEoi    ALL  T»|£    PbBT  A  (?f() 
Lines    UiLt   B£    IMPUTS.        OO  THE    OTHER     HA^Jl>J 

Poke  59459^  ^ffS"  (;;ewAft.Y  m\  \u»  )  ,   WILL    MAKE 
THEn    ALL   GoTpuTS.     Poke  S94S9^  240  (^GiwAry 

l|l|    JlS^fll^  )   WILL     CAUSE     PA0  T1b3  TT>     ee     l*J(*UT«^ 
AT    THE   SAf*V£    TIME    PA4  *n>7    will    es     otrrPiTrS- 
(PA0    IS    Co«^>eCT£0  To  THt    LEAST  SlfiMlFlcAKT  »IT   (M 
The  RESiSTFR*),         ]rO    TH'S    LAST     Co^JD^T^o^^,   IF 

Poke   59471 ,  izg  Csi*»ary  \^p4  «><i^^)  is  Ejcecutio, 

A*3    OWrFVT   'HttH'     WILL      appear    o»     PA7,  WHICH  WftHT, 
For   Ekahple,  ActvATE    A   RELAY   tmt\CHtp  to  iT, 


9, 


HIS     niftHT    AE     CLfAftEK     As    R    PlA^RA'^'. 


DATA   DlRECTtO^i  REiiSTElH   FtoKE  S94S9,  240 
PORT  A  DATA  R£<SIStfR'.  Po<£    S94TI  ,  (£8     - 


I      I     I     I     0    0    0    (^ 

—  OUTPUTS—'^  (NPOT»^— ' 
I      0    9J     0     ;<     X     A     X 


{; 


cAoss  LiMTib  ti  ovmrr 

CAVSeS   tllOClD  U    INPUT 


Cxs  cw*>y  cam) 


2^i 


^  o^RATts  Rei.fc»(  ee ... 
TttiS   tO^SflGu RATI 0(0,      DEVICES     Co«MecT€t»    -po    TtRMiMALS    PA4 -?    will  CESPoMP   TO    THE  MOST 
SKiMiFtCAMT     4    BITS      OF     THE    BiMARY    <0O/HBE(?     irt     59471   ,    AMP  CA<*4  8C    ORiVEM     Qy       POK£lM<i 
THAT     APPRESS      WITH     A     SorrAauE   NUMBER-        ft^    -mE      Sfl«£    Tine,       PEVICCS     ConmectEO    Tto 
PA^    -p?  3,  SUPPLY  (MS     A      Pl&lTAL      HliH   oR    LOU      Sl<i(4AL  ,  CA»>     &E   "REAP'*    gy      THE    Ca^VPUTtfc 

WITH   A     PEEK  (59471  ).       If  you    «£t  jwto  EjtPLoB.ifr36   the  port,   with    relays  oR  LEDs, 

6E     CAREFUL    aJoT    -Tb     oVERLoAP    THE    CUTTPUT  tlHES  -  FRo^\  THE    ^522   pATAfMEET,  IT  LookS    LIKE 

3nA    iS   THE    M6ST    Veu     cA*J    pRA(*i     Ufmotn"    SurFERlM^ . 

-ROY    6'8B|£»)     S4VC  '^tfi      6fAw«o/Jr  CA    ftXXlt 
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Capute 

Wherein  we 
acknowledge  recent 
goofs. . . 

This  page  brought  to  you  by  Robert  Lock, 
Editor/Publisher  and  our  (sometimes  hostile) 
but  always  active  readers. 

Larry's  article,  "Enhancing  Word  Pro  III"  in 
Issue  4,  contained  one  major  "oops!"  He  did  the 
patches  in  Basic  4.0  and  forgot  to  change  them  back. 
Here  are  the  fixes: 

Line  03F0  was  printed  as: 
01  43  55  E4  AD  C2  05  48 

It  should  be: 

01  43  2E  E6  AD  C2  05  48 

Zapped! 

In  my  review  of  6502  Software  Design  by  Leo  J. 
Scanlon,  I  said  that  Example  5-14  on  page  139  should 
add  a  value  of  two  to  location  22  rather  than  the 
value  of  one.  In  fact,  the  carry  bit  is  set,  so  that 
adding  one,  plus  the  carry,  effectively  adds  two. 

In  other  words:  the  book  was  right,  and  I  was 
wrong.  Oops! 
Jim  Butterfield  © 


Model  EP-2A-79 

EPROM  Programmer 


PET 


AIM-65 


OHIO  SCIENTIFIC 


Software  available  for  F-8,  6800,  8085.  8080,  Z-80,  6502,  1802, 
2650,6809,  8086  based  systems. 

EPROM  type  is  selected  by  a  personality  module  which  pluqs  into 
the  front  of  the  programmer.  Power  requirements  are  115  VAC 
50/60  Hz.  at  15  watts.  It  is  supplied  with  a  36-inch  ribbon  cable  for 
connecting  to  microcomputer.  Requires  I'-s  1/0  ports.  Priced  at 
$155  with  one  set  of  software.  (Additional  software  on  disk  and 
cassette  for  various  systems.)  Personality  modules  are  shown  below. 

Part  No.  Programs                                                                                                  Pries 

PMO  IMS  2708 $15.00 

PM  1  2704,2708 15.00 

PM2  27,32 30.00 

PM  3  TMS  2716       15.00 

PM4  TMS  2h-i2 - 30.00 

PM.S  TMS  2516,2716.2758      ,., 15,00 

PM8  MCM68764  33.00 

Optimal  Technology,  Inc. 

Blue  Wood  127,  Earlysvllle,  Virginia  22936 
Plione  (804)  973-5482 


Advertisers  Index 

Abacus  Software 95,104 

Ad^'enIur(,'  International  ...  .31 

Automaled  Simulations 37 

Business  Computer  Services  .  14 

CMS  Software    2,98 

Commodore BC 

Compelilive  Software 101 

Compumart II 

Computer  Cettter  of 

South  Bend 91 

Connertifui  Micro- 

Compuier 77 

Data  Equipment  Supplv 

Corp ■ 79 

D&R  Crenlive  Services 33 

Dr.  Daley's  Software 15 

Eastern  House 

Software 44,84,87 

Elcomp  PublisliinfT 26 

Elettronif  Sjiriiali.sis,  hu.    .  .36 

F.  I.  ElettroniLs 12 

FSS 36 

GPA  Electronics 48,87 

Harry- H.  Brilcy 97 

Howard  VV.  Sams  & 

Co.,  Jnc .7 

Iridis  , 68 

ITS 102 

Madison  Computer 38 

Maleo 102 

Michael  Allen 14 


\Iicro  Computer  Industries, 

Ltd 84 

Micro  Mini  Computer 

World 18 

Microphys  Prngrarn.s 38 

Nlicrosofl  Consumer 

Products 43 

Microtech 71 

Micro  Technology 

Unlimited.  .  .".' l.IBC 

NEECO 20 

Optimi^.ed  Data  Systems  ....  84 

Optimal  Technology 104 

PETTED 102 

Programmaiics  Software  ,  .  ,  iOO 

Qualily  Software 45,63 

Sawver  Software 77 

Skyles  Electric  Works  .7,'i.82,38 

Skyles/Trendeom IFC 

Small  Busities.s  Compuiing 

System.s 47 

Softside  Software  ,  .  - 80 

The  Software  Exchange 51 

Systems  Formulate  Corp.  .  .  .22 

f.H.E.S.I.S 61 

30  Company,  Int 33 

TIS 102 

TNW  Corporation 95 

Virginia  Micro  Systems 95 

Zeiglcr  Eletlronit 

Products 31 


PET  and  APPLE  II  Users 
PASCAL 

ABACUS  Soflusre  tsKei  3V3il3ble  its  version  of  TINlf 
PASCAL  for  the  users  of  two  of  the  nost  pcpiilsr  personsl 
eoiPuUrs. 

TINY  PASCAL  is  a  subset  of  the  standard  PASCAL  as 
defined  by  Jensen  and  Wirth.  It,  includis  ttii  strucLureJ 
pfo^aiins  features;  IF-fflEM-ELSEi  REFEftT-uyTILi  FC-  TG/ 
DOWTO-DQi  ydlLE-DOi  CASE-OF-aSE.  FOHC  and  FRQC,  Ney 
uou  can  learn  tfis  language  that  is  slated  to  becois  the 
successor  to  BASIC* 

TINY  PASCAL  is  a  cowlete  pacKaSe  that  allocs  yDU  to 
crealef  cospile  and  execute  proaraas  written  in  the  PASCAL 
IsnSua^et    You  can  save  source  and  oisJecl  code  en  dii^;etl5 
or  cassetleiFET  version  only).    The  coi^rehinsive  user's 
Mnual  can  be  exasitted  fcr  410( refundable  with  scftuare). 


REGUIREKENTS 

PET  m/m  New  ROSS  casette  HO 
PET  m/l2i  New  RQHS  disKette  «5 
Apple  II  VA  Applesoft  m  «/D33  135 
Apple  II  m  Applesoft  RA«  n/03S  *35 
TINT  PASCAL  User's  Hanual  $10 

6502  Interpreter  LisLins  *2C 


master  charge 


FREE  postage  in  U.S.  and  CANADA 
All  orders  prepaid  or  CGD 


VISA* 


ABACUS  SOFTWARE 

P.  0.  Box  7211 

Grand  Rapids,  Michigan 


49510 


COMPUTE.  compute  II. 

TM  TM 

The  Journal  For  Progressive  Computing.  The  Single-Board  COMPUTE. 

C  Please  enter  my  1  year  (6  issue)  subscription  to  COMPUTE. 
D  Please  enter  nny  1  year  (6  issue)  subscription  to  compute  II. 

My  computer  Is:  PET  APPLE  ATARI  OSI  SYM  KIM 

AIM Other (Specify)   

Check  One: 

S9,00  (U.S.  Mail  Order  Subscription) 

S12.00  U.S.  (Canadian  Subscription) 

n  I  want  Both! 

$15.00  (U.S.  Mail  Order  Subscription) 

$18.00  U.S.  (Canadian  Subscription) 

My  Name,  Address:    


Charge  my  Visa MC 

Number    Expires / / 

COMPUTE  and  comoufe  IS  ore  puDiicaiions  of  Small  System  Services,  >ric.  TOO  902  Sprir^  Gorden  St . 
Greensboro,  NC   27d03  9m.272.4847 

The  Editor's  Feedback: 

My  computer  is peT/CBM ATARI APPLE OTHER 

My  application  is  (check  all  that  apply); 

Home/Personal Business Educational 

Industrial Other 

Comments: 


Content; 

Best  Article  This  Issue  (page  *,  title) 


I'd  like  to  see  more 
articles  in  COMPUTE. 
I'd  like  to  see  fewer 
articles  in  COMPUTE. 
Other  suggestions: 


COMPUTE'S  BOOK  CORNER 


Best  of  The  PET  Gazette 
SIO.OO 
Collected  PET  User  Notes 

Volume  1,  Issues  2  -  7 
$9.00 

Volume  2,  Issue  1 
$1.50 

All  7  issues  SIO.OO 


My  Name, 

Address: 

Charge  my  Visa      

MC 

Fxnir*'s                 '                / 

Back  issues,  when  available,  $2.00  each. 
Issue  1,  not  presently  available. 

Add  S2.00  shipping  &  handling 
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Ptace 

Stamp 

Here 


COMPUTE./compute  II 

Post  Office  Box  5406 
Greensboro,  NC  27403 


Dear  Micro  Technology  Unlimited; 

Please  rush  me  the  Fall  1979  catalog  of  6502  expansion  and 
application  products. 

)  have  the  following  computerfsj; 

Old  PET New  PET AIIVl-65 KIM-1 SYM-1 

Thank  you  for  expediting. 

Sincerely, 


NAME; . 
STREET; 


CITY/STATE/ZIP: 
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COMPUTE.  compute  II. 

The  Journal  For  Progressive  Computing/"  The  Single-Board  COMPUTE. 

□  Please  enter  my  1  year  (6  issue)  subscription  to  COMPUTE, 
D  Please  enter  my  1  year  (6  issue)  subscription  to  compute  II. 

My  computer  is:  PET APPLE  ATARI  OSI  S¥M  KIM  _ 

AIM Other (Specify) 

Check  One: 

S9.00  (U.S.  Mail  Order  Subscription) 

$12.00  U.S.  (Canadian  Subscription) 

D  I  want  Bothi! 

S15.00  (U.S.  Mail  Order  Subscription) 

SIS.OO  U.S.  (Canadian  Subscription) 

My  Name,  Address: 


Charge  my  Visa MC 

Number    Expires /  _ 

COMPUTE  ana  comoule  Ji  aie  puDlicorions  o(  SmaU  Svsfem  Services,  inc   900  •302  Spring  Garden  St 
Greensooro  NC  2M03  •?W-272-'18(>7 


Skylcs  Electric  Works 

YES,  I  WANT  MORE  INFORMATION  ABOUT: 
PET  PERIPHERALS 

D     8,  16,  24  K  bytes  of  PET  Memory  Expansion  Systems 

n     Full  sized  PET  Keyboard  with  numeric  pad 

D     PAL-40  (40  column),  PAL-80  (80  column)  PET  Printers 

PET  PROGRAMMING  AIDS 

D     BASIC  PROGRAIVllVIERS  TOOLKIT 
n     IVIacroTeA  6502  Software  Development  System 
Name 


Address. 


City /State/Zip. 


D     Please  send  name  of  local  Skyles  Electric  Works  dealer. 


Micro  Technology  Unlimited 

P.O.  Box  12106 
2806  Hillsborough  St. 
Raleigh,  NC  27605 


COMPUTE./compute  II 

Post  Office  Box  5406 
Greensboro,  NC  27403 


Place  Postage 
Stamp  Here 


"~^ 


PLACE 
STAMP 
HERE 


NO  POSTAGE 

NECESSARY 

IF  MAILED 

INTHE 

UNITED  STATES 


BUSINESS  REPLY  MAIL 

First  Class  Permit  No.  503        Cupertino,  CA 

Postage  will  be  paitj  by  addressee: 


Skyles  Electric  Works 
10301  Stonydale  Drive 
P.  0.  Box  574 
Cupertino,  CA  95015 


TheGfeat 
Atnericati  Solution 

Machine. 


Meet  Commodore.  The  busi- 
ness computer  that's  providing 
solutions  for  more  than  100,000 
people  all  over  the  world.  Built 
by  one  of  the  pioneers  in  office 
machines.  With  a  reputation  for 
quality  that  can  only  come  from 
vertical  integration  of  the  total 
manufacturing  process.  Commo- 
dore builds,  not  assembles. 

Compare  Commodore's  word 
and  data  processing  capabilities 
with  computers  costing  twice  or 
even  three  times  as  much.  You'll 
see  why  so  many  small  busi- 
nesses are  turning  to  Commodore 
for  solutions  to  problems  as  var- 
ied as  these: 

n  A  car  leasing  company's  cus- 
tomers were  terminating  too  early 
for  account  profitability.  Solu- 
tion: A  16K  Commodore.  It 
analyzes  cash  flow  on  over  1200 
accounts,  identifies  those  for 
early  penalties,  and  even  writes 
up  lease  contracts.  Commodore 
paid  for  itself  within  weeks. 
D  A  law  firm  needed  a  high 
quality,  easy-to-use,  affordable 
word  processing  system. 
Solution:  Commodore  plus 
its  WordPro  software  pack- 


age. At  a  $6,000  savings. 
n  A  gasoline  retailer  needed  to 
inventory,  order  and  set  prices; 
determine  Federal  and  state 
income  taxes;  and  comply  with 
Federal  pricing  and  allocation 
regulations.  All  done  daily, 
weekly,  monthly  and  yearly. 
Solution:  Commodore.  It  keeps 
his  business  on  track— and  Uncle 
Sam  off  his  back. 
D  A  paint  and  wallpaper  store 
had  to  inventory  over  600  expen- 
sive wallpaper  lines  for 
profitability,  monitor  distributor 
sales,  set  and  track  salesmen's 
goals,  and  help  the  customer 
select  the  right  size,  pattern  and 
quantity.  Solution:  Two  32K 

Commodore  com- 
puters, floppy 
disk  and 
printer. 
Commodore 
does  it  all — 
and  account- 
ing, too. 

In  applica- 
tions like 


and  many  more.  Commodore 
solves  the  problems  that  stand  in 
the  way  of  increased  profitability. 
Commodore  can  provide  the  solu- 
tion in  your  Great  American  bus- 
iness, too.  Find  out  more  by  call- 
ing or  writing  any  of  Commo- 
dore's District  Sales  Offices. 
COSTA  MESA,  CA  2955  N.  Air- 
way Avenue  92626.  (714)  979-6307. 
SANTA  CLARA,  CA3330  Scott 
Boulevard  95051.  (408)  727-1130. 
DECATUR,  GA  5360  Snapfinger 
Woods  Drive  30035.  (404)  987-3311. 
BENSENVILLE,  IL  790  Maple 
Lane  60106.  (312)  595-5990. 
NORRISTQWN,  PA 
950  Rittenhouse  Road  19401. 
(215)  666-7950. 

DALLAS,  TX  4350  Beltwood 
Parkway  South  75234, 
(214)  387-0006. 

Commodore  Business  Machines, 
Inc.,  Computer  Sales  Division, 
Valley  Forge  Corporate  Center. 
950  Ritten- 
house Road, 


